Составьте программу паскаль, которая определяет значение функции y=|x|.

Var x: Integer;
begin
writeln('Введите значение числа x');
readln(x);
writeln('y=|',Abs(x),'|');
end.