Question

Дано целое число А. Если значение А > 0, то необходимо увеличить его на единицу. Разработать схему алгоритма для решения этой задачи. Протестировать алгоритм для A=5, A=-4, A=0. помогите пожалуйста ❤​

Answer 1

Ответ:

program primer;

var a: integer;

begin

 writeln('Введите a: ');

 read(a);

 if a>0

 then

   writeln('a+1=', a+1);

end.

Не за что ❤

Всегда рад помочь, начинающий ютубер WanziPLAY