Разработайте проект, который находит модуль числа. Записать

Question

Разработайте проект, который находит модуль числа. Записать

Answer 1

Var x: real;
begin
write('Введите число: ');
readln(x);
writeln(x, ' = |', abs(x), '|');
end.