Форум программистов, компьютерный форум, киберфорум
Наши страницы
C для начинающих
Войти
Регистрация
Восстановить пароль
 
kuyt
20 / 20 / 0
Регистрация: 24.11.2009
Сообщений: 66
1

Формулы Гауса и Н-Котеса

30.05.2010, 22:51. Просмотров 409. Ответов 0
Метки нет (Все метки)

Народ,помогите,мне препод дал задание,я написал прогу но у меня почемуто не правильно считает интеграл по Гаусу,может кто-нибудб глянуть и исправить или сказатьв чем ошибка,но лучше помочь исправить!!!!))

ВОТ КОД:
C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
# include <iostream.h>
# include <math.h>
# include <conio.h>
double Gauss(int N);
double NKotes(int N);
float m(float x);
double perv(float x);
void main()
{
float a=0.2,b=3.3;
double INT1,INT2,INT3,EPS=1e-5;
int N;
INT3=perv(b)-perv(a);
cout<<"pervoobraznaya= "<<INT3<<"\n";
N=2;
INT2=Gauss(N);
do
{
INT1=INT2;
N+=2;
INT2=Gauss(N);
}
while(fabs(INT2-INT1)>EPS);
cout<<"\n Gauss INT= "<<INT2<<"\n kol-vo razbieniy= "<<N;
N=2;
INT2=NKotes(N);
do
{
INT1=INT2;
N+=2;
INT2=NKotes(N);
}
while(fabs(INT2-INT1)>EPS);
cout<<"\n NKotes INT= "<<INT2<<"\n kol-vo razbieniy= "<<N;
getch();
}
double Gauss(int N)
{
float A[1]={1.0},X[1]={0.5};
float h,a=0.2,b=3.3;
int i,j;
double INT=0;
h=(b-a)/N;
for(j=1;j<=N;j++)
{
for(i=0;i<1;i++)
INT+=A[i]*m(a+(j-1)*h+X[i]*h);
}
INT*=h;
return INT;
}
double NKotes(int N)
{
float a=0.2,b=3.3,h;
int i,j;
float H[8]={751.0/17280,3577.0/17280,1323.0/17280,2989.0/17280,2989.0/17280,1323.0/17280,3577.0/17280,751.0/17280};
double INT;
h=(b-a)/N;
INT=(m(a)+m(b))*H[0];
j=0;
for(i=1;i<7*N-1;i++)
{
INT+=H[j++]*m(a+i*h);
if(j==7)
j=0;
}
INT*=h;
return INT;
}
float m(float x)
{
double INT;
INT=((x*x*x)*log(x*x+1));
return INT;
}
double perv(float x)
{
return(1./4*(x*x*x*x*log(x*x+1)-x*x*x*x/2-x*x));
}
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
30.05.2010, 22:51
Ответы с готовыми решениями:

Фильтр Гауса, непонятные значения
Доброго времени суток! Пытаюсь написать фильтр Гаусса для курсовой. Дела предстоят так: в...

Решение СЛАУ методом Гауса-Зейделя.
Всем привет! Простите за оффтоп, но... Сначала хотелось бы сказать спасибо всем, кто здесь реально...

Формулы Гаусса и Ньютона-Котеса
Всем тем кто читает мою тему!!! Привет!!! Я очень надеюсь на вашу помощь,и искренне верю что...

Метод Ньютона-Котеса
Нужно рассчитать значение определённого интеграла методом Ньютона-Котеса. Не подскажите каким...

Метод Ньютона - Котеса
Скопировала из реферата. Как изменить чтобы работала программа? program...

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
30.05.2010, 22:51

Вычисление интеграла (метод Ньютона-Котеса)
Помогите пожалуйста найти исходник на DELPHI для вычисления интеграла методом Ньютона-Котеса.

Вычислить функцию по Формуле Ньютена-Котеса
по Формуле Ньютена-Котеса замкнутого типа с точностью е=10 в -5 степени сиспользованием алгоритма с...

Вычисление интеграла методом Ньютона-Котеса
Дан интеграл: \int_{0}^{\pi /2}\frac{x+sin(x)}{1+cos(x)} Методом Ньютона-Котеса вычислить...


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

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

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