ПОМОГИТЕ!!!!!Дано целое число А, если значение А больше 0, то необходимо увеличить его на единицу. Написать программу для решения этой задачи.
ПОМОГИТЕ!!!!!
Дано целое число А, если значение А>0, то необходимо увеличить его на единицу. Написать программу для решения этой задачи.
Гость
Ответ(ы) на вопрос:
Гостьuses crt;
var a:integer;
begin
readln(a);
if a>0 then inc(a);
writeln(a);
end.
Не нашли ответ?
Похожие вопросы