计算方法 梯形抛物线公式求积分

根据计算方法中阐述的求积分方法编程：变步长梯形求积分 变步长抛物线求积分 复合抛物线求积分

#include
#include
double fx（double x）
{return sqrt（x）;}
void main（）
{
	int ni;
	double abxhesasbs1s2kcd;
    printf（“-------变步长抛物线积分-------\n\n“）;
	printf（“请输入左右端点ab的值:“）;
	scanf（“%lf%lf“&a&b）;
	printf（“请输入精确度e的值:“）;
	scanf（“%lf“&e）;
	h=b-a;
	sa=fx（a）+fx（b）;
	kc=1;
	n=1;
	printf（“-----------------------------\n“）;
	printf（“     n	    s2          |d|    \n\n“）;
	sa=fx（a）+fx（b）;
	while（1）
	{   sb=0;
		x=a-h/2;
		for（i=1;i<=n;i++）
		{sb=sb+fx（x+i*h）;}
        s2=（4*sb+sa）*h/6;
		if（n==1）
		{
        s1=s2;
		sa=sa+2*sb;
		n=2*n;
		h=h/2;
		}
		else
		{
     	printf（“%6d    %lf    “ns2）;
        d=s2-s1;
		if（fabs（s2）>=kc）
		d=d/s2;
		printf（“%lf\n“fabs（d））;
	
        if（fabs（d）		else 
		
        s1=s2;
		sa=sa+2*sb;
		n=2*n;
		h=h/2;
		}
	}
	
		printf（“积分的结果是:%lf\n“s2）;
}

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

     文件      41984  2009-12-14 11:29  4\Debug\vc60.idb

     文件      45056  2009-12-14 11:29  4\Debug\vc60.pdb

     文件     188473  2009-12-14 11:28  4\Debug\变步长抛物线积分.exe

     文件     201984  2009-12-14 11:28  4\Debug\变步长抛物线积分.ilk

     文件       6098  2009-12-14 11:28  4\Debug\变步长抛物线积分.obj

     文件     221420  2009-12-14 11:28  4\Debug\变步长抛物线积分.pch

     文件     361472  2009-12-14 11:28  4\Debug\变步长抛物线积分.pdb

     文件     188471  2009-12-14 11:29  4\Debug\变步长梯形积分.exe

     文件     201816  2009-12-14 11:29  4\Debug\变步长梯形积分.ilk

     文件       5848  2009-12-14 11:29  4\Debug\变步长梯形积分.obj

     文件     221420  2009-12-14 11:29  4\Debug\变步长梯形积分.pch

     文件     361472  2009-12-14 11:29  4\Debug\变步长梯形积分.pdb

     文件     188471  2009-12-14 11:29  4\Debug\复合抛物线积分.exe

     文件     201000  2009-12-14 11:29  4\Debug\复合抛物线积分.ilk

     文件       4919  2009-12-14 11:29  4\Debug\复合抛物线积分.obj

     文件     221420  2009-12-14 11:29  4\Debug\复合抛物线积分.pch

     文件     361472  2009-12-14 11:29  4\Debug\复合抛物线积分.pdb

     文件        911  2009-12-06 17:40  4\变步长抛物线积分.cpp

     文件       3523  2009-12-14 11:28  4\变步长抛物线积分.dsp

     文件        557  2009-12-14 11:29  4\变步长抛物线积分.dsw

     文件      33792  2009-12-14 11:29  4\变步长抛物线积分.ncb

     文件      48640  2009-12-14 11:29  4\变步长抛物线积分.opt

     文件        796  2009-12-14 11:28  4\变步长抛物线积分.plg

     文件        829  2009-12-06 09:39  4\变步长梯形积分.cpp

     文件       3499  2009-12-14 11:29  4\变步长梯形积分.dsp

     文件        553  2009-12-14 11:29  4\变步长梯形积分.dsw

     文件      33792  2009-12-14 11:29  4\变步长梯形积分.ncb

     文件      48640  2009-12-14 11:29  4\变步长梯形积分.opt

     文件        786  2009-12-14 11:29  4\变步长梯形积分.plg

     文件        632  2009-12-06 16:51  4\复合抛物线积分.cpp

............此处省略10个文件信息