Вычислить значение выражения - PascalABC.NET (24601)

Формулировка задачи:

мне нужно присвоить значение lg|x|. то что lg(x)=ln(x)/ln(10), я знаю. а вот модуль как впихнуть в это затрудняюсь, подскажите как правильно написать? мб lg(x)=abs(ln(x)/ln(10))?

Решение задачи: «Вычислить значение выражения»

Листинг программы

begin
  var x := ReadLnReal('x =');
  WriteLn('lg|', x, '| = ', Log10(Abs(x)));
end.

Объяснение кода листинга программы

В начале кода объявляется переменная x типа Real с помощью ключевого слова var и функции ReadLnReal, которая считывает значение переменной x с помощью функции ReadLn.
Затем вычисляется значение функции Log10 от модуля значения переменной x с помощью функции Abs.
Результат вычисления записывается в консоль с помощью функции WriteLn, в которую передаются строки 'lg|', значение переменной x, '| = ' и вычисленное значение функции Log10 от модуля значения переменной x.