Пожалуйста помогите! Найдите исправьте все ошибки, допущенные в этой программе.Запишите программу без ошибок.
Var a;b;c:Integer;d:real;
Begin
Writeln('b=?',b)
Readln(b);
a=10;
с:ab
Writeln(' a x b' равно' C);
d:=c div b;
writeln(d)
End.
Нет комментариев
Ответы
Гость Var a,b,c:integer;d:integer;
Begin
Writeln('b=?',b);
Readln(b);
a:=10;
с:=a*b;
Writeln(' a x b равно', c);
d:=c div b;
writeln(d)
End.
ошибки я старалась выделить жирным
2 комментария:
Большое спасибо!
Извиняюсь,но пишет неизвестное имя С
Большое спасибо!
Извиняюсь,но пишет неизвестное имя С Список предметов
