Реализации алгоритмов/Интерполяция/Многочлен Лагранжа: различия между версиями

Содержимое удалено Содержимое добавлено
Строка 190:
 
== Maple ==
lx --- список <math>x_i</math>
ly --- список <math>y_i(x_i)</math>.
n --- степень полинома.
z --- здесь будет записан полином.
x --- переменная в полиноме.
d --- вспомогательная переменная для накопления произведения.
Всё остальное смотрим в документации по Maple.
<source lang="pascal">
ly := [2, 6, 14]:
lx := [0, 1, 2]:
n := 23; z := 0: d := 1: x := 'x':
for i to 3n do for j to 3n do
if j <> i then
d := (x-op(j, lx))*d/(op(i, lx)-op(j, lx));