传热学上机编程题3

《传热学上机编程题3》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、传热学上机传热学上机艾科热木江·艾尔肯建环1003u201015592传热学上机4-2．#includeusingnamespacestd;voidmain(){inti=0,j=0,M=9,N=7,K,IT,B;intp=1;doubleEPS,TTB,TRB,TLB,TBB,TT,eps,TI,A;cout<<"请输入K,EPS,TI,TTB,TRB,TLB,TBB:"<>K>>EPS>>TI>>TTB>>TRB>>TLB>>TBB;doubleT[9][7];for(i=0;i

2、LB;T[M-1][i]=TRB;}cout<=0;j--)B=p;for(IT=0;IT=1;j--){TT=T[i][j]

3、;T[i][j]=0.25*(T[i-1][j]+T[i][j-1]+T[i+1][j]+T[i][j+1]);A=T[i][j]-TT;if(eps<0)eps=-eps;if(A<0)A=-A;if(eps<=A)eps=A;}}if(eps<=EPS){for(j=N-1;j>=0;j--)传热学上机{for(i=0;i

4、ludeusingnamespacestd;voidmain(){intN,t,NP,TM,IT,M;doubleBi,Fo,d,tf,a,h,y,dx,T0;doubleT[11],TT[11];cout<<"请输入壁厚d:";cin>>d;cout<<"请输入半壁厚等分数N：";cin>>N;传热学上机cout<<"请输入控制打印节点节点温度的时间间隔NP:";cin>>NP;cout<<"请输入流体温度tf:";cin>>tf;cout<<"请输入时间间隔t:";cin>>t;cout<<"请输入终止计算时间TM:";cin>>TM;cout<<"请

5、输入表面传热系数h:";cin>>h;cout<<"请输入平壁导热系数y:";cin>>y;cout<<"请输入初始温度T0:";cin>>T0;cout<<"请输入热扩散率a：";cin>>a;dx=d/(2.0*(double)N);Bi=h*dx/y;Fo=a*t/(dx*dx);cout<1.0/(2.0*Bi+2.0))cout<<"不稳定"<

6、out<=1;i--){TT[i]=Fo*(T[i-1]+T[i+1])+(1.0-2.0*Fo)*T[i];}TT[N]=2.0*Fo*(T[N-1]+tf*Bi)+(1.0-2.0*Fo-2.0*Fo*Bi)*T[N];TT[0]=2.0*Fo*T[1]+(1.0-2.0*Fo)*T[0];for(i=0;i<11;i++)T[i]=TT[i];if(IT%NP==0){cout<

7、<"";传热学上机}cout<