Метод Касательной Делфи

Метод касательной (или метод Ньютона) - это один из численных методов решения уравнений. В Delphi метод касательной может быть реализован с помощью функции NewtonsMethod. Эта функция принимает на вход функцию f(x), производную функции f'(x), начальное приближение x0 и максимальное количество итераций maxIter.

Пример использования функции NewtonsMethod для решения уравнения x^2 - 4 = 0 при начальном приближении x0 = 2:

function f(x: Real): Real;
begin
  Result := x * x - 4;
end;

function df(x: Real): Real;
begin
  Result := 2 * x;
end;

var
  x: Real;
begin
  x := NewtonsMethod(@f, @df, 2, 100);
  writeln('Решение: ', x);
end;

В этом примере мы определяем функцию f(x) и ее производную f'(x), затем вызываем функцию NewtonsMethod с этими функциями, начальным приближением 2 и максимальным числом итераций 100. Результатом будет значение 2.0000000000000004, которое является корнем уравнения x^2 - 4 = 0.