Скачиваний:
10
Добавлен:
01.05.2014
Размер:
721 б
Скачать
☆
# include <math.h>
# include <iostream.h>
double F(double x);
double  X[8]={-0.96028986,-0.79666648,-0.52553242,-0.18343464,
	      0.18343464,0.52553242,0.79666648,0.96028986};
double  A[8]={0.10122854,0.22238103,0.31370664,0.36268378,
	      0.36268378,0.31370664,0.22238103,0.10122854};
double Gauss(double a, double b, int n)
{
	int i;
	double ti,y=0;
	for (i=1; i<=n; i++)
	    {
	     ti=((a+b)/2)+(b-a)*X[i-1]/2;
	     y=y+((b-a)/2)*A[i-1]*F(ti);
	    }
	return y;
}

double F (double t)
{
    return (1/(log(1+t)));
}

void main (void)
{
	     double a,b;
	     a=1;
	     b=3;
	     int n=8;
	     csr(0);
	     cout<<"\n ‡­ зҐ­ЁҐ Ё­вҐЈа « : "<<Gauss(a,b,n);
	     waitpress();
}
Соседние файлы в папке Лабораторные работы 7_8