Напишите программу паскаль если x>10 или x<-10 то y=x+5

var x,y:real;

begin

readln(x);

if (abs(x))>10 then

y:=x+5;

writeln(y);

end.