• 大小: 10KB
    文件类型: .rar
    金币: 1
    下载: 0 次
    发布日期: 2021-06-11
  • 语言: Matlab
  • 标签: vc  

资源简介

vc下用复化梯形积分法和复化Simpson积分法以及Gauss-Legendre求积法求解Fredholm积分方程,并配有MATLAB的测试程序

资源截图

代码片段和文件信息

#include “Calculate.h“
//#include “GaussRemove.h“
//#include “stdio.h“

double ee = 0.0000000001;
long MaxN = 1000; //最大节点数

void main()
{
double e = 0;
int n; //初始节点个数

double * pd_Result = new double [1]; //u(xi)的结果

//复化梯形法初始n = 32
n = 32 ;
do 
{
n = n*2;
if ( n > MaxN)
{
n = n/2;
break;
}
delete []pd_Result ;
pd_Result = FormulaTrapezia(ne);


while( e >= ee);

  OutPutResult(pd_Resultn);
cout<<“The number of FormulaTrapezia is “<
cout<<“The error of FormulaTrapezia is:“;
cout<
//复Simpson法初始n = 32
n = 32 ;
do 
{
n = n*2;
if ( n > MaxN)
{
n = n/2;
break;
}
delete []pd_Result ;
pd_Result = FormulaSimpson(ne);

while( e >= ee);


  OutPutResult(pd_Resultn);
cout<<“The number of FormulaSimpson is “<
cout<<“The error of FormulaSimpson is:“;
cout<



//Gauss积分法
n = 7;

pd_Result = FormulaGauss(ne);

   ShowVector(pd_Resultn);
cout<<“The error of FormulaGauss is:“;
cout<}


 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件      54784  2008-12-24 16:43  Calculate.opt

     文件       2561  2008-12-19 09:27  GaussRemove.h

     文件       1198  2008-12-22 19:41  Calculate.plg

     文件       1281  2008-12-22 19:41  Calculate.cpp

     文件       3567  2008-12-17 21:05  Calculate.dsp

     文件        543  2008-12-15 19:55  Calculate.dsw

     文件       4940  2008-12-22 19:38  Calculate.h

     文件      50176  2008-12-24 16:43  Calculate.ncb

----------- ---------  ---------- -----  ----

               119050                    8


评论

共有 条评论