Вычислительный эксперимент и методы вычислений. Ловецкий К.П - 12 стр.

UptoLike

s := 0;
for i:=1 to nPoints do
begin
x1:=xLeft+(i-1)*(xRight-xLeft)/(nPoints-1);
sw := abs(f_sinx(x1)-L_2(x1));
if s < sw then s := sw;
end;
result := s;
end;
Текст программы и исполняемый модуль находятся на сай-
те кафедры: http://mathmod.sci.pfu.edu.ru
12
x
Главное окно с результатом работы программы представле-
но на рисунке 1. Сплошная линияграфик функции
, штриховаясоответствующий полином Лагранжа
siny=
(1.13).
Рис1. Интерполяция функции
sinyx
=