Лабораторна робота №1
Розв’язати нелінійне
рівняння sin(x+-0,5x=0 з точністю
:
Знайдемо розв’язок рівняння за допомогою методу Ньютона
Рівняння
sin(x+-0,5x=0
має корінь на відрізку [1..2], тому що f(1)=0,38865>0, a f(2)=-0,90575<0.
Так як - визначена і двічі
диференційована на [1..2] , причому похідні
зберігають
знак на [1..2] (
, збереження знаків похідних видно на графіку 1
і 2 відповідно)
графік 1 (перша похідна)
графік 2 (друга похідна)
Тоді , виходячи з
початкового наближення що
задовольняє нерівність
ітераційна
послідовність
звідки
,
Вибираємо
початкове наближення кореня так, щоб
Вибираємо
, тому
що
(
)
Ітерації будемо віконувати в середовищі програмування Borland Pascal:
Program chm1;
uses WinCRT;
var x, xx : real;
n : integer;
const e=0.0001;
begin
n := 0; xx:=2;
while (abs(xx-x)>e) do
begin
x := xx;
xx := x-((sin(x+pi/3)-0.5*x)/(cos(x+pi/3)-0.5));
n := n+1;
writeln ('pri n=',n,' ',((xx+x)/2):9:8);
end;
readln;
end.
Корінь х=1.35204424 отриманий на 4-й ітерації:
Перевіримо результати обчислень, побудувавши графік в Mathcad:
Розв’язок даного рівняння в Mathcad:
Уважаемый посетитель!
Чтобы распечатать файл, скачайте его (в формате Word).
Ссылка на скачивание - внизу страницы.