Пожалуйста помогите! Найдите исправьте все ошибки, допущенные в этой программе.Запишите...

Question

Пожалуйста помогите! Найдите исправьте все ошибки, допущенные в этой программе.Запишите программу без ошибок.
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.

Answer 1

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.
ошибки я старалась выделить жирным

Comments

Большое спасибо!

---

Извиняюсь,но пишет неизвестное имя С