СРОЧНО! с клавиатуры вводит числа напишите программу которая вычитает из него 10, если...

Question

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

Answer 1

Var n:integer;

begin
readln(n);
if n<0 then   n-=10<br>else n+=10;
writeln(n);
end.