Составь и запиши программу на языке Паскаль, которая, если введенное число отрицательное, меняет его на противоположное.
var
x:integer;
begin
readln(x);
if x
writeln(x);
end.