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

Question

Маланя

12 января, 08:14

+4

Ответы (1)

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

Гея · Answer 1

Program название;

var

n:integer;

begin

readln (n) ;

if n<0 then

n: = n-10

else

n:=n+10;

writeln (n) ;

end.