Question

Исправить все ошибки допущенные в программе
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.

Answer 1

Program Task_1_11;
Var a, b, c: Integer;
Begin
Writeln (' Введите число ') ;
Readln(a);
b := 5;
c:= a*b;
Writeln (' произведение ', a, ' и ', b, ' равно ' , c);
Readln (a);
End.