| 编程中国 | 业界新闻 | 技术文章 | 视频教程 | 下载频道 | 程序源码 | 个人空间 | 编程论坛
全能ASP/PHP/ASP.NET主机,支持月付专业 MSSQL 数据库空间,支持月付专业 MySQL 数据库空间,支持月付学习型 ASP/PHP/ASP.NET 主机 30元/年
高端软件开发 = 年薪十万不是梦   
共有 151 人关注过本帖
标题:急!急!急!一个小程序,请高手看一下问题出在哪啊?
收藏  订阅  推荐  打印
liaobiao0903
Rank: 1
等级:新手上路
帖子:22
积分:354
注册:2008-7-26
急!急!急!一个小程序,请高手看一下问题出在哪啊?

为什么不可以调试和运行?问题出在哪啊?
#include "math.h"
double ffts(a,b,eps,f)
double a,b,eps,(*f)();
{ int n,k;
double fa,fb,h,t1,p,s,x,t;
fa=(*f)(a); fb=(*f)(b);
n=1; h=b-a;
t1=h*(fa+fb)/2.0;
p=eps+1.0;
while (p>=eps)
{ s=0.0;
for (k=0;k<=n-1;k++)
{ x=a+(k+0.5)*h;
s=s+(*f)(x);
}
t=(t1+h*s)/2.0;
p=fabs(t1-t);
t1=t; n=n+n; h=h/2.0;
}
return(t);
}



#include "stdio.h"
#include "9ffts.c" (注:9ffts.c为上面函数文件名 )
double e;
main()
{ double a,b,eps,t1,t2,e,sum,fftsf(double);
scanf("%lf",&e);
a=0.0; b=1.0; eps=0.000001;
t1=ffts(a,b,eps,fftsf);
a=0.0; b=1.0; eps=0.000001;
t2=ffts(a,b,eps,fftsf);
sum=t1+t2;
printf("\n");
printf("sum=%e\n",sum);
printf("\n");
return 0;
}

#include "math.h"
double fftsf(double x)
{double y;
double z=0.5;
y=16.7*((2.0*(e-z*x))/0.002-((e-z*x)/0.002)*((e-z*x)/0.002));
return(y);
}
2008-8-4 08:57
共有 150 人关注过本帖
关于我们 | 广告合作 | 编程中国 | 清除Cookies | Archiver | WAP | TOP

编程中国 版权所有,并保留所有权利。鲁ICP备08000592号
Powered by Discuz, Processed in 0.047538 second(s), 9 queries.
Copyright©2004-2008, BCCN.NET, All Rights Reserved