24小时热门版块排行榜

返回列表

当前主题已经存档。

_xiao_xiao_

金虫 (小有名气)

应助: 0 (幼儿园)
金币: 6372.3
红花: 1
帖子: 199
在线: 53.7小时
虫号: 919393
注册: 2009-12-03
性别: MM
专业: 凝聚态物性 II ：电子结构

[交流] 【请教】C语言编程问题

请教C语言编程高手，我下面的程序有什么问题，我是想计算方程a/K2=1/(Te-2*K2/a)+Df*T0/((Te-T0-2*K2/a)*(Te-T0-2*K2/a))的a的解，在Df和T0循环变化的情况下，a的值比较小，几十个纳米左右。本人在此先谢过了！
#define filename1 "d:\\f11.dat"
#include
#include
#include
#include
#include
using namespace std;
int main( )
{FILE *fp;fp=fopen(filename1,"w"

;
  double a,a1,a2,b,c,Df,T0,Te,K2;
scanf("%d %d",&Te,&K2);
  for(Df=5;Df<=30;Df=Df+5)
  {for(T0=750;T0<=800;T0=T0+10)
{ while (a<1000*1e-9)
{ a=1e-9;
a1=a/K2;
a2=1/(Te-2*K2/a)+Df*T0/((Te-T0-2*K2/a)*(Te-T0-2*K2/a));
                              c=a1-a2;
if(c>-1e-6&&c<1e-6)
{    b=a*1e9;
                              printf("%6.2f  ",b);
fprintf(fp," %6.2f  ",b);
                              break;
}
else
   a=a+1e-10;
}
         }
   printf("\n"

;
fprintf(fp,"\n"

;
}
fclose(fp);
return 0;
}

回复此楼

» 猜你喜欢

» 本主题相关商家推荐: (我也要在这里推广)

快乐地学习生活！

1楼 2010-01-15 21:38:24

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

相关版块跳转我要订阅楼主 _xiao_xiao_ 的主题更新

返回列表