Метод на допирателните (Нютон) за решаване на уравнения 
f(x) = 0

Задача: Дадено е уравнението (((x^2)-2x - 4)/(x+1)) = 0.
a) Да се намери броят на всички корени и да се локализира (1) най-големия, (2) най-малкия от тях (в случай на повече от един корени).
б) Направете 2 итерации по метода на Нютон (допирателните).
в) Каква е точността на последно полученото в б) приближение? 
г) Да се намери локализирания от подточка а) корен с точност 0.001.

I. Локализация на корен:
a = ?, b = ? , такива че x* ∈ [a, b]

f[x_]:=(((x^2)-2x-4)/(x+1));
Plot[f[x],{x,-10,10}]

Plot[f[x],{x,-1,5,-1}]

Plot[f[x],{x,-1.4,-1.1}]

f[-1.4]

f[-1.1]

II. Проверка на условията за сходимост на метода:
f’(x), f’’(x) да са с постоянни знаци в интервала [a, b]

Plot[f'[x],{x,-1.4,-1.1}]

Plot[f''[x],{x,-1.4,-1.1}]

III. Определяне на начално приближение:
 (Subscript[x, 0]) = ?, такова че f((Subscript[x, 0])).f’’(x) > 0

x0=-1.1

IV. Уточняване на корена:
(Subscript[x, n+1]) = (Subscript[x, n]) - ((f((Subscript[x, n])))/(f'((Subscript[x, n])))), n = 0,1,2,...
с оценка на грешката (Subscript[ϵ, n]) = |x* - (Subscript[x, n])|:
(Subscript[ϵ, n])  ⩽ ((Subscript[M, 2])/(2 (Subscript[m, 1]))) |(Subscript[x, n])-(Subscript[x, n-1])((|)^2), 
където (Subscript[M, 2]) = (max_([a,b]))|f’’(x)| , (Subscript[m, 1 ]) = (min_([a,b]))|f’(x)|

Определяне на постоянните величини
(Subscript[M, 2]) = ?,  (Subscript[m, 1 ])=?

Plot[Abs[f''[x]],{x,-1.4,-1.1}]

M2=Abs[f''[-1.1]]

Plot[Abs[f'[x]],{x,-1.4,-1.1}]

m1=Abs[f'[-1.4]]

K=(M2/(2m1))

Извършване на итерациите

Извършваме итерациите последователно като използваме Mathematica за калкулатор:

f[-1.1]

f'[-1.1]

-1.1-(5.9/101)

K ((Abs[-1.1584158415841586`-(-1.1)])^2)

f[-1.1584158415841586`]

f'[-1.1584158415841586`]

Съставяме програмен код на Mathematica, който извършва итерациите и печата необходимите ни величини:

💡 Тайни козове

Solve

FindRoot