Вычислить методом касательных (Pascal)

[SEXTANT]

Вычислить методом касательных корень уравнения x^3-2x^2+x-3=0. Начальное приближение к корню 2.2. Абсолютная погрешность приближения не должна превышать e(задается преподавателем). e=0.1
Помогите, пожалуйста, не могу понять сам метод касательных. Pascal.

[type_Oleg]

Сообщение от SEXTANT

.. не могу понять сам метод касательных. Pascal.

Что ж тут непонятного, вот в Википедии все же расписано:

[Serge_Bliznykov]

да, type_Oleg, и правда, всё понятно.

не знаю, правильно ли я взял производную, у меня получится такой "сложный" код:

function f(x:real) : real;
// x^3-2x^2+x-3=0
begin
  f := x*x*x-2*x*x+x-3
end;

function fp(x:real) : real;
// 3*x^2-4x+1
begin
  fp := 3*x*x-4*x+1
end;


var x, delta : real;
begin
  x := 2.2;
  repeat
    delta := f(x)/fp(x);
    x := x - delta;
  until abs(delta)<0.1;
  
  WriteLn('x = ',x:0:4,' f(x)=', f(x):0:4)
end.

[SEXTANT]

Спасибо большое, очень выручили