Вычислить интеграл

24.01.2015, 06:03. Показов 641. Ответов 0

Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
program lab_5;
function integral(a,b,a1,b1:real):real;
   var k,igrl:real;
      begin
      k:=sqrt(sqr(a)-sqr(b));
      if sqr(a)>sqr(b) then
      igrl:=((-1)*(1/k))*ln(abs(b*b1+a+k*sqrt(sqr(a)-sqr(b1))/(b1+b)))-((-1)*(1/k))*ln(abs(b*a1+a+k*sqrt(sqr(a)-sqr(a1))/(a1+b)));
      if sqr(a)<sqr(B) then
      igrl:=((-1)*(1/k))*arctan((sqrt(sqr(b)-sqr(a))*sqrt(sqr(a)-sqr(b1)))/(sqr(a)+b*b1))-((-1)*(1/k))*arctan((sqrt(sqr(b)-sqr(a))*sqrt(sqr(a)-sqr(a1)))/(sqr(a)+b*a1));
      integral:=igrl;
      end;
var a2,b2,a3,b3,i:real;
   begin
   Writeln('введите переменные a,b');
   Readln(a2,b2);
   Write('введите нижний предел A=');
   readln(a3);
    Write('введите нижний предел B=');
   readln(b3);
   i:=integral(a2,b2,a3,b3);
   write('интеграл=',i);
   end.

Почему выдает NaN???

$https://www.cyberforum.ru/cgi-bin/latex.cgi?\int_{\alpha}^{\beta} \frac{dx}{(x+b)\sqrt{a^2-x^2}}=\begin{cases}<br /> \left. -\,\frac{1}{\sqrt{a^2-b^2}}\,ln\left|\frac{bx+a+\sqrt{a^2-b^2}+\sqrt{a^2-x^2}}{x+b} \right| \right|_{\alpha}^{\beta} & \text{ , } a^2 \gt b^2 \\ <br /> \left. -\,\frac{1}{\sqrt{a^2-b^2}}\,arctg\,\frac{\sqrt{b^2-a^2}\sqrt{a^2-x^2}}{a^2+bx} \right|_{\alpha}^{\beta} & \text{ , } a^2 \lt b^2<br /> \end{cases}$

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

24.01.2015, 06:03

Ответы с готовыми решениями:

Вычислить интеграл
Вычислить интеграл \int_{a}^{b}\sin x\operatorname{d}x по формуле трапеций, разбив отрезок на n частей. Значения...

Вычислить определенный интеграл
как это записать в паскале,и составить блок схему Определенный интеграл от 1 до2 1/x dx....вычислить

Вычислить интеграл по формуле прямоугольников
\int_0^1 \sin \frac abx\,dx где a=\sum_{k=1}^3\frac{k+4}{k+2}\ ,\qquad b=3t^2+4\ ,\qquad t=4.3\cos a Помогите...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

24.01.2015, 06:03

Помогаю со студенческими работами здесь

Вычислить интеграл методом прямоугольников
Помогите пожалуйста, уже не первый день сижу: С погрешностью 0.001 вычислить по методу прямоугольников:

Вычислить интеграл методом трапеции
Найти методом трапеций, разбивая отрезок интегрирования на n = 22. \int_{0}^{\frac n2} \sin ^2x Так же найти с...

Вычислить интеграл методом трапеций
помогите пожалуйста, буду очень благодарен, паскаль Вычислить интеграл методом трапеций \int_{0.2}^{1}\frac{x}{\sin ^2(3x)}dx

Вычислить интеграл с заданной точностью
Имеется программа, которая рассчитывает значение интеграла на отрезке и записывает значение в отдельный файл. type s1=record; end; ...

Вычислить определенный интеграл с заданной точностью
Вычислить определенный интеграл \int_{0}^{1}{x}^{2}\sqrt{1-{x}^{3}} с заданной точностью {10}^{-5} помогите с точностью разобраться ...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .

Наверх