Пример кода на языке Pascal для вычисления функции |x²-x|-7x:(x3-15x):

program FunctionCalculation;
var
x, result: real;
begin
writeln('Введите значение x: ');
readln(x);
// Вычисляем значение функции
result := (abs(sqr(x) - x) - 7 * x) / (power(x, 3) - 15 * x);
writeln('Значение функции при x = ', x, ' равно ', result);
end.

Программа позволяет вводить значение переменной x и вычислять значение функции по заданной формуле.