6受热面热量分配.c

这个源码是从其它网站上转载来的

#include <stdio.h>
#include <math.h>
#define Qgl 103207
#define Bj 6.1115
#define Ql 9590.7
#define Qnz 946.3
#define Qgr2 1983
#define Qgr1 1893.1
#define Irk 2194.6
#define Ilk 193
#define Igr 6118.9
main()
{
	float Qlz,Qnzz,Qg2z,Qg1z,Qsmz,Qkyz,Qky,Ipy,Tpy;
	Qlz=Bj*Ql;
	Qnzz=Bj*Qnz;
	Qg2z=Bj*Qgr2;
	Qg1z=Bj*Qgr1;
	Qsmz=Qgl-(Qlz+Qnzz+Qg2z+Qg1z);
    Qky=(1.06+0.03)*(Irk-Ilk);
	Qkyz=Bj*Qky;
    Ipy=Igr-(Qsmz+Qkyz)/(Bj*0.9936)+0.04*Ilk+0.06*(Irk+Ilk)/2;
	Tpy=100+100*(Ipy-967)/991;
	printf("Qlz=%f,Qnzz=%f,Qg2z=%f,Qg1z=%f,Qsmz=%f,Qky=%f,Qkyz=%f,Ipy=%f,Tpy=%f",Qlz,Qnzz,Qg2z,Qg1z,Qsmz,Qky,Qkyz,Ipy,Tpy);
}