《输油管道设计与管理》课程设计水力计算程序4页.doc

#include#include#define Q 1002.9 /流量,m3/h;#define D 0.559 /管外径,m; #define d 0.5384 /管内径,m; #define v 9.028e-6 /运动粘度,m2/s; #define L 1953 /管道全长,Km;#define Zz 1530 /终点海拔高度Zz=1530m;#define ZQ 800 /起点海拔高度ZQ=0m;#define rowt 853.5 /油品在计算温度下的密度,Kg/m3;#define Hsq 0.3e6/(9.81*rowt) /首站进站压力,m水柱;#define Hsz 0.2e6/(9.81*rowt) /末站剩余压头,m水液柱;#define hm 10 /站内损失,m;main()