Исправить все ошибки допущенные в программе Program Task_1_11; Var a; b; c; Integer; Begin Writeln (' Введите число ', a); Readln (a) b = 5; c: = ab; Writeln (' произведение ' a и b ' равно ', 5); Readln (a); End.

Program Task_1_11;

Var a; b; c; Integer;

/ / между переменными нужны запятые а не точки с запятой

/ / после с - двоеточие

Begin Writeln (' Введите число ', a); / /а - лишнее.

Readln (a) / /нет точки с запятой в конце строки

b = 5; / /вместо ":=" использован знак равенства

c: = ab; / /Нет знака умножения между а и b

Writeln (' произведение ' a и b ' равно ', 5);

/ / a и b - заменить на :, а, ' и ', b,

//вместо 5 нужно вписать с

Readln (a); / / лишняя команда

End.

Рабочая программа

Program Task_1_11;

Var a, b, c: Integer;

Begin

Writeln (' Введите число ');

Readln (a);

b: = 5;

c: = a * b;

Writeln (' Произведение чисел ', a, ' и ', b, ' равно ', c);

End.