Дано целое число. Если оно является положительным то прибавить к нему 20, в противном случае вычесть из него 5. Вывести полученное число (Написать программу, начертить блок-схему).

Question

Бобораим

18 мая, 09:45

+4

Ответы (1)

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

Лаласа · Answer 1

Program qwerty;

var a:integer;

begin

read (a) ;

if a>0 then a:=a+20

else a:=a-5;

write (a) ;

end.