Помощь - Поиск - Пользователи - Календарь
Полная версия: Интеграл
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Shkipper
Ребят можете помоч решить хоть какие нибудь задачи из этих

4.написать программу которая
Для заданных границ интернирования, a и b вычислите значение определенного интеграла следующего вида.

Спасибо за ранее огромное

Нажмите для просмотра прикрепленного файла
TarasBer
Ну и? Формула дана, в лоб можно записать спокойно, сделав подстановку, в чём проблема?
Lapp
Цитата(TarasBer @ 12.05.2011 18:01) *
Ну и? Формула дана, в лоб можно записать спокойно, сделав подстановку, в чём проблема?
Под словами "в лоб" Тарас, по всей видимости, имел в виду рекурсию )).

Шкипер, ты пробовал начать делать? Если да - показывай. Тут гораздо лучше относятся к тем, что хоть что-то сам делает.

На первый раз - так и быть.. )) Функция будет выглядеть приблизительно вот так (не проверял, набирал прямо тут):
function IntegralPowerByExp(n,m: integer; a,x1,x2: double): double;
  function Power(x,y: double): double;
  begin
    Power:= Exp(y*Ln(x))
  end;
begin
  if n=1 then
    IntegralPowerByExp:= Power(a,m*x)/m/Ln(a) * (x - 1/Ln(a));
  else
    IntegralPowerByExp:=
      (Power(x,n)*Power(a,m*x)/n - n/m*IntegralPowerByExp(n-1,m,a,x1,x2)) / Ln(a))
end;

Спрашивай, что неясно.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.