Исправить все ошибки допущенные в программе 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 (' Введите число ') ; Readln(a); b := 5; c:= a*b; Writeln (' произведение ', a, ' и ', b, ' равно ' , c); Readln (a); End.
Var a, b, c: Integer;
Begin
Writeln (' Введите число ') ;
Readln(a);
b := 5;
c:= a*b;
Writeln (' произведение ', a, ' и ', b, ' равно ' , c);
Readln (a);
End.