Дано число. если оно чётное, то увеличить его на 1, в противном случае увеличить его на 2. , напишите программу по .в фри паскаль.

Lizzka6889 Lizzka6889    3   24.04.2019 16:40    2

Ответы
kuytdrg87 kuytdrg87  08.06.2020 18:06

var a: integer;

begin

readln(a);

if (a mod 2=0) then a:=a+1 else a:=a+2;

writeln(a);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика