Вычислить значение определённого интеграла с помощью рекурсии Опции

[Zigfried]

Для заданных границ интегрирования а и b вычислите значение определённого интеграла следующего вида:

∫dx/cosⁿ x= (1/(n-1))*(sin x/cos^n-1x)+((n-2)/(n-1)∫dx/cos^n-2 x,n=>2
ln tg(π/4+x/2),n=1
x,n=0



Помогите пожалуйста)))

Сообщение отредактировано: Zigfried - 22.03.2010 22:08

[volvo]

Неправда... Формула вообще-то выглядит вот так:


У тебя было записано нечто другое...

Как делается рекурсия? Вот так и делается:

function f(x: double; n: integer): double;
begin
  if n = 0 then f := x
  else
    if n = 1 then f := { вычисляешь f по второй формуле, для n = 1 }
    else
      f := { первое слагаемое из формулы } - {второе слагаемое из формулы } +
        (n - 2) / (n - 1) * f(x, n - 2); 
end;

А дальше эта функция передается в функцию вычисления интеграла. В FAQ-е есть примеры...

Справишься?