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

1

Ответы и объяснения

2014-03-06T04:46:05+00:00

Это Проверенный ответ

×
Проверенные ответы содержат надёжную, заслуживающую доверия информацию, оценённую командой экспертов. На "Знаниях" вы найдёте миллионы ответов, правильность которых подтвердили активные участники сообщества, но Проверенные ответы - это лучшие из лучших.
Var a:longint;
begin
read(a);
if a>0 then
a:=a+1;
end.