资源描述：
《天然气管道输送 C语言编程计算.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、1.#include"stdio.h"main(){floatPH,D,S,J,F;F=0.72;scanf(“%f,%f,%f”,&PH,&D,&S);J=(PH*D)/(2*S*F);printf(“%f”,J);}2.#include"stdio.h"main(){floatD,d,J;scanf(“%f,%f”,&D,&J);d=D-2*J;printf(“%f’,d);}3.#include"stdio.h"main(){floatPB,P,W;scanf(“%f,%f”,&P,&W)
2、;PB=P/W;printf(“%f”,PB);}4.#include"stdio.h"main(){floatP1,P,P2,J;scanf(“%f,%f,%f”,&P,&J,&P2);P1=(P-J*P2)/(1+J);printf(“%f”,P1);}5.#include"stdio.h"main(){floatP2,PB,P,J;scanf(“%f,%f,%f”,&PB,&P,&J);P2=PB+J*P;printf(“%f”,P2);}6.#include"stdio.h"main()
3、{floatPCP,P1,P2;scanf(“%f,%f”,&P1,&P2);PCP=(2/3)*(P1+(P2*P2)/(P1+P2));printf(“%f”,PCP);}7.#include"stdio.h"main(){floatB,E,D,d;d=pow(D,0.2);scanf(“%f,%f”,&E,&D);B=1.05*0.03817/(E*E*d);printf(“%f”,B);}8.#include"stdio.h"#include"math.h"main(){floatl,D
4、,q,P1,P2,X,B,Z,TCP,d;X=0.61;scanf("%f,%f,%f,%f,%f,%f,%f",&D,&q,&P1,&P2,&B,&Z,&TCP);d=pow(D,2.5);l=((105.113*d/q)*(105.113*d/q))*(P1*P1-P2*P2)/(X*B*Z*TCP);printf("%f",l);}9.#include"stdio.h"main(){floatPKCP,P1,PK;scanf(“%f,%f”,&P1,&PK);PKCP=(2/3)*(P1+
5、PK*PK/(P1+PK));printf(“%f”,PKCP);}10.#include"stdio.h"#include"math.h"main(){floatl,D,q,P1,PK,X,B,ZK,TKCP,d;X=0.61;scanf("%f,%f,%f,%f,%f,%f,%f",&D,&q,&P1,&PK,&B,&ZK,&TKCP);d=pow(D,2.5);l=((105.113*d/q)*(105.113*d/q))*(P1*P1-PK*PK)/(X*B*ZK*TKCP);print
6、f("%f",l);}11.#include"stdio.h"main(){floatn,L,lk,l;scanf(“%f,%f”,&lk,&l);L=650;n=(L-lk)/l+1;printf(“%f”,n);}12#include"stdio.h"#include"math.h"main(){floatH,k,ZB,R,T,a,b;k=1.5;R=48.34;T=293;scanf(“%f,%f”,&ZB,&a);b=pow(a,(0.5/1.5));H=(k/(k-1))*Z*R*T*
7、(b-1);printf(“%f”,H);}13.#include"stdio.h"main(){floatN0,G,H,,c;c=0.8;G=70.91scanf(“%f,%f”,&G,&H);N0=G*H/(102*c);printf(“%f”,N0);}14#include"stdio.h"main(){floatGT,D,a;scanf(“%f,%f”,&G,&H);GT=0.0246615*(D-a)*a;N0=G*H/(102*c);printf(“%f”,GT);}15#inclu
8、de"stdio.h"main(){floatK,KN,a,N,L,K0,KB,GT,KD,D,Kn;scanf(“%f,%f,%f,%f”,>,&D,&L,&N);KN=7200;a=1.05;K0=20000000;KB=960;KD=1.21794/650;Kn=15000;K=KN*a*N/L+K0/L+KB*GT+KD*D+Kn;printf(“%f,%f”,K,K*650);}16#include"stdio.h"main(){floatC,CN,N,L,C0,Ca,K;scan
