Написать программу с помощью которой компьютер находит модуль числа X.Паскаль.Сделайте пожалуйста!

PascalABC.NET 3.4.2, сборка 1847 от 28.10.2018Внимание! Если программа не работает, обновите версию!

begin

 var x := ReadReal;

 Writeln('|', x, '| = ', Abs(x))

end.

-24.019|-24.019| = 24.019