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