Ошибка в 2 строчке: Var a,b,s: integer; , а должно Var a,b:integer; s:real;
Ошибка в 4 строчке: read(b) , а должно быть read(b);
Ошибка в 6 строчке: writele('ответ='s); , а должно writeln('ответ=', s);
Ошибка в 2 строчке: Var a,b,s: integer; , а должно Var a,b:integer; s:real;
Ошибка в 4 строчке: read(b) , а должно быть read(b);
Ошибка в 6 строчке: writele('ответ='s); , а должно writeln('ответ=', s);