# include <stdio.h>
# include <math.h>
int c; //定义流程方式//
int xh; //定义循环方式//
int m; //定义冷却倍率//
float Vw; //水速//
float q1; //清洁系数//
float d0; //冷凝管外径//
float k0; //基本传热系数//
float z;
float tw1; //冷却水进口温度//
float w; //温度修正系数//
float ws;
float bh; //管壁厚度//
float lx; //材料类型//
float xs; //壁厚修正系数//
float Q,hk,hc,qk,hz,k;
float A,tm,tw2;
float s,ts,N,qw,di,L,lj;
void lqbx();
void lqss();
void qjxs();
void chuanre();
void wdxz();
void hdxz();
/*---------------------------*\
1
/*--------------------------*/
void main()
{
/*冷却倍率的确定*/
printf("请输入流程方式单流程1或双流程2\n");
printf("请输入循环方式闭式循环3或开式循环4\n");
scanf("%d %d",&c,&xh);
lqbx();
/*材料的确定及由此确定的冷却水流速*/
printf("请选材料类型1 HSn70-1 2 HAL77-2 3 BFe10-1-1 4 BFe30-1-1 5碳钢 6不锈钢 7 TA1,TA2\n");
scanf("%f",&lx);
lqss();
/*清洁系数的选择*/
qjxs();
//**基本传热系数K0**//
printf("请输入冷凝管外径\n");
scanf("%f",&d0);
z=10*Vw;
chuanre();
printf("k0=%0.3f\n",k0);
//**温度修正系数**//
printf("please input the tw1\n");
scanf("%f",&tw1);
wdxz();
printf("w=%0.3f\n",w);
//冷凝管材料壁厚修正系数xs//
printf("请输入材料管壁厚度0.425-2.225\n");
scanf("%f",&bh);
hdxz();
printf("xs=%0.3f\n",xs);
printf("请输入汽轮机排汽比焓hk\n");
printf("请输入凝结水比焓hc\n");
printf("请输入辅助热负荷hz\n");
printf("请输入汽轮机排汽量qk\n");
printf("请输入冷却水量qw\n");
scanf("%f%f%f%f%f",&hk,&hc,&hz,&qk,&qw);
Q=(hk-hc)*qk*1e3+hz;
printf("Q=%0.3e\n",Q);
k=k0*q1*w*xs;
ws=2180/(4.187*m);
tw2=tw1+ws;
ts=tw2+8;
s=log((ts-tw1)/(ts-tw2));
tm=(tw2-tw1)/s;
A=Q/(k*tm);
printf("A=%0.1f\n",A);
di=d0-2*bh;
printf("di=%0.1f\n",di);
lj=3.14*di*di*Vw;
N=4*qw*1e6/(lj);
L=A*1e6/(3.14*d0*N);
printf("N=%0.0f L=%0.0f\n",N,L);
}
/*---------------------------*\
1
/*--------------------------*/
void lqbx()
{
if (c==1)
{
if (xh==3)
printf("please choose m from 45 to 75\n");
else
printf("please choose from 60 to 80\n");
}
else
{
if (xh==3)
printf("please choose m from 40 to 65\n");
else
printf("please choose m from 50 to 75\n");
}
printf("请输入冷却倍率\n");
scanf("%d",&m);
printf("m=%d\n",m);
}
/*---------------------------*\
2
/*--------------------------*/
void lqss()
{
if(lx==1||lx==2)
printf("please choose Vw from 1.7-2.1\n");
else if (lx==3||lx==4)
printf("please choose Vw from 1.8-2.3\n");
else if (lx==7)
printf("please choose Vw from 2.1-2.5\n");
else if (lx==6)
printf("please choose Vw from 1.9-2.3\n");
printf("please input Vw\n");
scanf("%f",&Vw);
printf("Vw=%3.3f\n",Vw);
}
/*---------------------------*\
3
/*--------------------------*/
void qjxs()
{
if (lx==1||lx==2||lx==3||lx==4)
printf("please choose q1 from 0.80-0.85\n");
else if(lx==7)
printf("please choose q1 from 0.85-0.90\n");
else if(lx==6)
printf("please choose q1 from 0.85-0.90\n");
printf("please input the value of q1\n");
scanf("%f",&q1);
printf("q1=%3.3f\n",q1);
}
/*---------------------------*\
4
/*--------------------------*/
void chuanre()
{
if(z==10)
{
if(d0>=15.9&&d0<=19.1)
k0=2744;
else if(d0>=22.2&&d0<=25.4)
k0=2702;
else if(d0>=28.6&&d0<=31.8)
k0=2662;
else if(d0>=34.9&&d0<=38.1)
k0=2621;
else if(d0>=41.3&&d0<=44.5)
k0=2580;
else if(d0>=47.6&&d0<=50.8)
k0=2539;
}
else if(z==12)
{
if(d0>=15.9&&d0<=19.1)
k0=3007;
else if(d0>=22.2&&d0<=25.4)
k0=2962;
else if(d0>=28.6&&d0<=31.8)
k0=2917;
else if(d0>=34.9&&d0<=38.1)
k0=2872;
else if(d0>=41.3&&d0<=44.5)
k0=2827;
else if(d0>=47.6&&d0<=50.8)
k0=2782;
}
else if(z==14)
{
if(d0>=15.9&&d0<=19.1)
k0=3249;
else if(d0>=22.2&&d0<=25.4)
k0=3200;
else if(d0>=28.6&&d0<=31.8)
k0=3151;
else if(d0>=34.9&&d0<=38.1)
k0=3102;
else if(d0>=41.3&&d0<=44.5)
k0=3054;
else if(d0>=47.6&&d0<=50.8)
k0=3005;
}
else if(z==16)
{
if(d0>=15.9&&d0<=19.1)
k0=3473;
else if(d0>=22.2&&d0<=25.4)
k0=3421;
else if(d0>=28.6&&d0<=31.8)
k0=3368;
else if(d0>=34.9&&d0<=38.1)
k0=3316;
else if(d0>=41.3&&d0<=44.5)
k0=3264;
else if(d0>=47.6&&d0<=50.8)
k0=3214;
}
else if(z==17)
{
if(d0>=15.9&&d0<=19.1)
k0=3580;
else if(d0>=22.2&&d0<=25.4)
k0=3526;
else if(d0>=28.6&&d0<=31.8)
k0=3473;
else if(d0>=34.9&&d0<=38.1)
k0=3419;
else if(d0>=41.3&&d0<=44.5)
k0=3365;
else if(d0>=47.6&&d0<=50.8)
k0=3314;
}
else if(z==18)
{
if(d0>=15.9&&d0<=19.1)
k0=3684;
else if(d0>=22.2&&d0<=25.4)
k0=3628;
else if(d0>=28.6&&d0<=31.8)
k0=3573;
else if(d0>=34.9&&d0<=38.1)
k0=3518;
else if(d0>=41.3&&d0<=44.5)
k0=3463;
else if(d0>=47.6&&d0<=50.8)
k0=3408;
}
else if(z==19)
{
if(d0>=15.9&&d0<=19.1)
k0=3784;
else if(d0>=22.2&&d0<=25.4)
k0=3728;
else if(d0>=28.6&&d0<=31.8)
k0=3671;
else if(d0>=34.9&&d0<=38.1)
k0=3614;
else if(d0>=41.3&&d0<=44.5)
k0=3558;
else if(d0>=47.6&&d0<=50.8)
k0=3501;
}
else if(z==20)
{
if(d0>=15.9&&d0<=19.1)
k0=3883;
else if(d0>=22.2&&d0<=25.4)
k0=3825;
else if(d0>=28.6&&d0<=31.8)
k0=3767;
else if(d0>=34.9&&d0<=38.1)
k0=3709;
else if(d0>=41.3&&d0<=44.5)
k0=3650;
else if(d0>=47.6&&d0<=50.8)
k0=3592;
}
else if(z==21)
{
if(d0>=15.9&&d0<=19.1)
k0=3979;
else if(d0>=22.2&&d0<=25.4)
k0=3919;
else if(d0>=28.6&&d0<=31.8)
k0=3860;
else if(d0>=34.9&&d0<=38.1)
k0=3800;
else if(d0>=41.3&&d0<=44.5)
k0=3741;
else if(d0>=47.6&&d0<=50.8)
k0=3681;
}
else if(z==22)
{
if(d0>=15.9&&d0<=19.1)
k0=4072;
else if(d0>=22.2&&d0<=25.4)
k0=4012;
else if(d0>=28.6&&d0<=31.8)
k0=3950;
else if(d0>=34.9&&d0<=38.1)
k0=3889;
else if(d0>=41.3&&d0<=44.5)
k0=3829;
else if(d0>=47.6&&d0<=50.8)
k0=3767;
}
else if(z==23)
{
if(d0>=15.9&&d0<=19.1)
k0=4164;
else if(d0>=22.2&&d0<=25.4)
k0=4102;
else if(d0>=28.6&&d0<=31.8)
k0=4040;
else if(d0>=34.9&&d0<=38.1)
k0=3977;
else if(d0>=41.3&&d0<=44.5)
k0=3915;
else if(d0>=47.6&&d0<=50.8)
k0=3852;
}
else if(z==24)
{
if(d0>=15.9&&d0<=19.1)
k0=4254;
else if(d0>=22.2&&d0<=25.4)
k0=4190;
else if(d0>=28.6&&d0<=31.8)
k0=4127;
else if(d0>=34.9&&d0<=38.1)
k0=4062;
else if(d0>=41.3&&d0<=44.5)
k0=3999;
else if(d0>=47.6&&d0<=50.8)
k0=3935;
}
else if(z==26)
{
if(d0>=15.9&&d0<=19.1)
k0=4410;
else if(d0>=22.2&&d0<=25.4)
k0=4344;
else if(d0>=28.6&&d0<=31.8)
k0=4276;
else if(d0>=34.9&&d0<=38.1)
k0=4210;
else if(d0>=41.3&&d0<=44.5)
k0=4139;
else if(d0>=47.6&&d0<=50.8)
k0=4076;
}
else if(z==28)
{
if(d0>=15.9&&d0<=19.1)
k0=4556;
else if(d0>=22.2&&d0<=25.4)
k0=4486;
else if(d0>=28.6&&d0<=31.8)
k0=4414;
else if(d0>=34.9&&d0<=38.1)
k0=4345;
else if(d0>=41.3&&d0<=44.5)
k0=4270;
else if(d0>=47.6&&d0<=50.8)
k0=4205;
}
else if(z==30)
{
if(d0>=15.9&&d0<=19.1)
k0=4692;
else if(d0>=22.2&&d0<=25.4)
k0=4619;
else if(d0>=28.6&&d0<=31.8)
k0=4542;
else if(d0>=34.9&&d0<=38.1)
k0=4471;
else if(d0>=41.3&&d0<=44.5)
k0=4393;
else if(d0>=47.6&&d0<=50.8)
k0=4326;
}
else if(z==32)
{
if(d0>=15.9&&d0<=19.1)
k0=4820;
else if(d0>=22.2&&d0<=25.4)
k0=4744;
else if(d0>=28.6&&d0<=31.8)
k0=4664;
else if(d0>=34