Дано целое число. если оно положительное то +1, иначе не менять заданное число. информатика

stalina2705 stalina2705    3   20.09.2019 17:00    2

Ответы
katerinalavrenchuk katerinalavrenchuk  08.10.2020 05:00
Var n:integer;

begin
readln(n);
if n>0 then begin inc(n);  writeln(n);end
else writeln(n);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика