Интерполяционный многочлен Лагранжа в точке - Free Pascal

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

Здравствуйте! Есть такое задание, помогите пожалуйста: Функция f=sqrt(x)*sin(x) задана таблично. Вычислить значение интерполяционного многочлена Лагранжа для интерполирования назад в точке x=0.175, сравнить его со значением функции f(x) в данной точке. Узлы интерполирования приведены в таблице:

x0	x1	x2	x3	x4	x5
0.1	0.2	0.25	0.3	0.4	0.45

Видел, что попадалось людям такое задание только на отрезке, как его переделать на вычисление в точке? Пример: Построить интерполяционный многочлен Лагранжа

Решение задачи: «Интерполяционный многочлен Лагранжа в точке»

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

f0:=f(x0)*(x-x1)*(x-x2)*(x-x3)*(x-x4)*(x-x5)/((x0-x1)*(x0-x2)*(x0-x3)*(x0-x4)*(x0-x5));

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

Импортируются необходимые модули.
Задаются значения переменных x0, x1, x2, x3, x4, x5.
Вычисляется значение интерполяционного многочлена Лагранжа в точке x0.
Результат вычислений сохраняется в переменной f0.