给水排水管道工程-湖南大学环境科学与工程学院.docVIP

给水排水管道工程 课 程 设 计 指 导 书 环境科学与工程学院第一部分 城市给水管网水力计算程序及习题 一、程序 #define M 18 #define N 6 #define ep 0.01 #include math.h int sgn(double x); main() { int k, i,ko,q,p,flag=0; double h[M]; double l[]={?}; double D[]={?}; double Q[]={?}; int io[]={?}; int jo[]={?}; double f[N+1],r[N+1],dq[N+1]; for(k=0;k=M-1;k++) { Q[k]=Q[k]*0.001; } for(k=0;k=M-1;k++) { Q[k]=Q[k]*sgn(io[k]); } ko=0; loop: for(k=0;k=M-1;k++) { h[k]=10.67*pow(fabs(Q[k]),1.852)*l[k]; h[k]=h[k]/(pow(100,1.852)*pow(D[k],4.87))*sgn(Q[k]); } for(i=1;i=N;i++) { f[i]=0;r[i]=0;