Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 03.06.2017
Сообщений: 80
1

Приближенное вычисление интеграла функции f(x)=cos(x), используя формулу трапеции

08.06.2017, 17:56. Показов 1013. Ответов 2
Метки нет (Все метки)

https://www.cyberforum.ru/cgi-bin/latex.cgi?\int_{a}^{b}f(x)dx\approx h((y0+yn0/2+y1+y2+...+y(n-1))
написать программу на языке паскаль для приближенного вычисления интеграла функции f(x)=cos(x) на заданном отрезке используя формулу трапеции.
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
08.06.2017, 17:56
Ответы с готовыми решениями:

Приближенное вычисление интеграла функции f(x)=cos(x), используя формулу Симпсона
\int_{a}^{b}f(x)dx\approx 2h/3 *((y0+y2m/2+2y1+y2+...+2y(2m-1)) написать программу на языке...

Приближенное вычисление значения функции cos(x)
Вычислить с точностью е = 10 ^ -4 значение функции ________________________ Представленной рядом в...

Приближенное вычисление значения функции cos(x) Отблагодарю голосами в контакте!
Вычислить с точностью е = 10 ^ -4 значение функции ________________________ Представленной рядом в...

Вычисление интеграла используя формулу прямоугольников
Задание во вложении. Собственно вопрос, при использовании fyl2x часть данных из стека я теряю (!?)...

2
Модератор
63707 / 47266 / 32576
Регистрация: 18.05.2008
Сообщений: 114,559
08.06.2017, 18:41 2
Лучший ответ Сообщение было отмечено анастасия1501 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
function f(x:real):real;
begin
f:=cos(x);
end;
var a,b,h,s:real;
    n,i:integer;
begin
repeat
writeln('Введите границы интервала b<a');
readln(a,b);
until b>a;
repeat
write('Введите четное число разбиений от 20 до 1000 n=');
readln(n);
until (n>=20)and(n<=1000)and(n mod 2=0);
h:=(b-a)/n;
s:=(f(a)+f(b))/2;
for i:=1 to n-1 do
s:=s+f(a+i*h);
s:=s*h;
write('S=',s:0:5);
end.
Сверится можно например на этом ресурсе
https://math24.biz/integral_def

Добавлено через 2 минуты
Кстати у Вас формула неверная
I=h*((f(a)+f(b)/2)+ дальше верно
1
0 / 0 / 0
Регистрация: 03.06.2017
Сообщений: 80
08.06.2017, 18:45  [ТС] 3
спасибо))
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
08.06.2017, 18:45

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Приближенное вычисление интеграла от быстро осциллирующей функции
Ребята привет) Задали курсовую на тему приближенное вычисление интеграла от быстро осциллирующей...

Приближенное вычисление интеграла функции методом средних прямоугольников
Напишите программу приближенного вычисления интеграла функции ƒ(х)=5х2-х+2 методом средних...

Приближенное вычисление интеграла C++

Найти приближенное значение интеграла дифференциального уравнения первого порядка 1)Используя метод Эйлера 2)используя функцию odesolve
здраствуйте. методом Эйлера решение сделал, а вот с помощью odesolve не получается... Уравнение:...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.