Question

❗СРОЧНО❗ Ввести число. Якщо воно невід'ємне, то відніміть від нього 50, у противному випадку додати до нього 100. (Написати програму)
НА РУССКОМ ❗Введите число. Если оно неотрицательно, то вычтите от него 50, в противном случае добавить к нему 100. (Написать программу)​

Answer 1

program prg;

var

 number: integer;

begin

 write('Input number: ');

 read(number);

 if number >= 0 then

   number := number - 50

 else

   number := number + 100;

 writeln('New value: ', number);

end.