С клавиатуры водит число напишите программу которая вычитает из него 10, если оно отрицательно, в противном случае прибавляет к нему 10 и выводит на экран

Question

Гедимин

5 августа, 10:13

+2

Ответы (1)

Знаешь ответ?

Маруша · Answer 1

Program название;

var

n:integer;

begin

readln (n);

if n<0 then

n: = n-10

else

n:=n+10;

writeln (n);

end.