Question

Задание: Найдите ошибки в записи программы Program TESTYLE="1;

vaR A, b, C:integer

begin

writeln(‘Введи а, в, с’);

readln(A, B, C, D)

C:=(A+B)*(B-A)

Writeln(c)

End

Answer 1

Program TESTYLE="1; Запрещенные символы в названии "=

vaR A, b, C:integer не хватает ; и инициализации D

writeln(‘Введи а, в, с’); ковычка не та, которую юзают в паскале

readln(A, B, C, D) нет ;

C:=(A+B)*(B-A) нет ;

Writeln(c) нет ;

end нет .

Исправный код:

Program TESTYLE1;

vaR A, b, C,D:integer;

begin

writeln('Введи а, в, с');

readln(A, B, C, D);

C:=(A+B)*(B-A);

Writeln(c);

End.