Составить программу к задаче в паскаль. Дано число. Если оно положительное, то увеличьте его на 1, в противоположном случае уменьшите его на 2. Результат выведите на экран.

Question

Федяха

11 февраля, 07:02

+1

Ответы (1)

Знаете ответ на вопрос?

Епистима · Answer 1

Var

num: integer;

begin

read (num) ;

if num > 0 then write (num + 1) else write (num - 2) ;

end.