Дано целое число. если оно больше 0, то прибавить к нему 2, если меньше или равно то вычесть из него 1. вывести полученное число.
Дано целое число. если оно больше 0, то прибавить к нему 2, если меньше или равно то вычесть из него 1. вывести полученное число.
Гость
Ответ(ы) на вопрос:
Гостьvar a:integer;
Begin
Readln(a);
If a>0 then
a:=a+2;
If a<=0 then
a:=a-1;
Writeln(a);
End.
Не нашли ответ?
Похожие вопросы