Реферат: Вычисление определённых интегралов
{вычисляем значение второго интеграла, передавая в функцию Integral имя вычисляемой функции
в данном случае f2, интервал интегрирования a=1 b=e
cm=c[i] dm=d[i](последние два параметра перебираются в цикле и не равны 0, т.к. f2 от них зависит)
eps=1e-3(точность), в параметр n, по выходе из функции вычисления интеграла будет записано число итераций}
writeln('с=',c[i]:4:2,' d=',d[j]:4:2,' равен ',Integral(f2,a,b,c[i],d[j],eps,n):8:5, ' ',n, ' итераций');
end;
end.
Результаты счета.
Проверочный интеграл от 0 до пи sin(x)dx =2.00000 2 итераций
Интеграл от 0 до 3.142 функции f1 с точностью 1.0E-0004 при:
с=0.90 d=2.40 равен 17.12437 3 итераций
с=0.90 d=2.50 равен 19.52435 3 итераций
с=0.90 d=2.60 равен 22.28654 3 итераций
с=1.00 d=2.40 равен 22.33040 2 итераций
с=1.00 d=2.50 равен 25.49172 2 итераций
с=1.00 d=2.60 равен 29.12609 3 итераций
с=1.05 d=2.40 равен 24.19102 3 итераций
с=1.05 d=2.50 равен 27.60541 3 итераций
с=1.05 d=2.60 равен 31.52694 3 итераций
с=1.10 d=2.40 равен 25.37969 3 итераций
с=1.10 d=2.50 равен 28.93760 3 итераций
с=1.10 d=2.60 равен 33.01928 3 итераций
Интеграл от 1 до 2.718 функции f2 с точностью 1.0E-0003 при:
с=3.00 d=0.50 равен 8.40102 2 итераций
с=3.00 d=0.40 равен 5.52503 2 итераций
с=3.00 d=0.85 равен 17.78460 2 итераций
с=3.20 d=0.50 равен 9.35094 2 итераций
с=3.20 d=0.40 равен 6.29171 2 итераций
с=3.20 d=0.85 равен 19.17026 2 итераций
с=3.40 d=0.50 равен 10.29153 2 итераций