Question

помогите пожалуйста​

Answer 1

Ответ:

Вот программа без ошибок:

program zadacha;

var a: integer;

begin

writeln('введите число a);

readln(a);

if a>0 then a:=a+1;

writeln('Полученное число ',a);

end.

Объяснение:

Введите а, если а больше 0 тогда а равно а+1