秋霞电影网午夜鲁丝片无码,真人h视频免费观看视频,囯产av无码片毛片一级,免费夜色私人影院在线观看,亚洲美女综合香蕉片,亚洲aⅴ天堂av在线电影猫咪,日韩三级片网址入口

《輸油管道設(shè)計(jì)與管理》課程設(shè)計(jì)水力計(jì)算程序(共4頁(yè))

上傳人:29 文檔編號(hào):51989427 上傳時(shí)間:2022-02-07 格式:DOC 頁(yè)數(shù):4 大?。?8KB
收藏 版權(quán)申訴 舉報(bào) 下載
《輸油管道設(shè)計(jì)與管理》課程設(shè)計(jì)水力計(jì)算程序(共4頁(yè))_第1頁(yè)
第1頁(yè) / 共4頁(yè)
《輸油管道設(shè)計(jì)與管理》課程設(shè)計(jì)水力計(jì)算程序(共4頁(yè))_第2頁(yè)
第2頁(yè) / 共4頁(yè)
《輸油管道設(shè)計(jì)與管理》課程設(shè)計(jì)水力計(jì)算程序(共4頁(yè))_第3頁(yè)
第3頁(yè) / 共4頁(yè)

下載文檔到電腦,查找使用更方便

20 積分

下載資源

還剩頁(yè)未讀,繼續(xù)閱讀

資源描述:

《《輸油管道設(shè)計(jì)與管理》課程設(shè)計(jì)水力計(jì)算程序(共4頁(yè))》由會(huì)員分享,可在線閱讀,更多相關(guān)《《輸油管道設(shè)計(jì)與管理》課程設(shè)計(jì)水力計(jì)算程序(共4頁(yè))(4頁(yè)珍藏版)》請(qǐng)?jiān)谘b配圖網(wǎng)上搜索。

1、精選優(yōu)質(zhì)文檔-----傾情為你奉上 #include #include #define Q 1002.9 //流量,m^3/h; #define D 0.559 //管外徑,m; #define d 0.5384 //管內(nèi)徑,m; #define v 9.028e-6 //運(yùn)動(dòng)粘度,m^2/s; #define L 1953 //管道全長(zhǎng),Km; #define Zz 1530 //終點(diǎn)海拔高度Zz=1530m; #define ZQ 800

2、 //起點(diǎn)海拔高度ZQ=0m; #define rowt 853.5 //油品在計(jì)算溫度下的密度,Kg/m^3; #define Hsq 0.3e6/(9.81*rowt) //首站進(jìn)站壓力,m水柱; #define Hsz 0.2e6/(9.81*rowt) //末站剩余壓頭,m水液柱; #define hm 10 //站內(nèi)損失,m; main() { double Re, Re1, Re2, E, Qs; double lamda, hl; double A, N; double

3、ai; double H, Hc,V; Qs=Q/3600; V=4*Qs/(3.14*d*d); printf("\n 流速V=%f(m/s)\n\n",V); printf(" 流量Qs=%f(m^3/s)\n\n",Qs); Re=4*1002.9/(3.14*d*3600*v); printf(" 雷諾數(shù)Re=%0.2E\n\n",Re); E=2*0.1/(d*1000); printf(" 相對(duì)當(dāng)量粗糙度E=%0.2E\n\n",E); Re1=59.5/pow(E,8.0/7); printf

4、(" 第一邊界雷諾數(shù)Re1=%0.2E\n\n",Re1); Re2=(665-765*log10(E))/E; printf(" 第二邊界雷諾數(shù)Re2=%0.2E\n\n",Re2); /******************************************* ***判斷流態(tài),選用對(duì)應(yīng)摩阻計(jì)算公式; ********************************************/ /************如果流態(tài)在層流區(qū)**************/ if(Re<2000) { printf(" /********

5、***************************/\n"); printf(" Re<2000 層流區(qū) \n"); printf(" 層流區(qū)水力摩阻系數(shù)lamda=64/Re;\n\n"); lamda=64/Re; printf(" 水力摩阻系數(shù) lamda=%0.4f\n\n",lamda); printf(" 選用達(dá)西公式計(jì)算沿程阻力損失hl(m)\n"); hl=(lamda*(L*1000)*(V*V))/(d*2*9.81); printf(" 沿程阻力損失h

6、l hl=%0.2E\n\n",hl); printf(" 選用列賓宗公式計(jì)算沿程阻力損失hl(m)\n"); hl=4.15*Qs*v*(L*1000)/pow(d,4); printf(" 沿程阻力損失hl hl=%0.2E\n\n",hl); ai=4.15*Qs*v/pow(d,4); printf(" 水力坡降ai=%0.5f\n\n",ai); } /************如果流態(tài)在水力光滑區(qū)**************/ if(3000

7、(" /***********************************/\n"); printf(" 3000

8、達(dá)西公式計(jì)算沿程阻力損失hl(m)\n"); hl=(lamda*(L*1000)*(V*V))/(d*2*9.81); printf(" 沿程阻力損失hl hl=%0.2E\n\n",hl); printf(" 選用列賓宗公式計(jì)算沿程阻力損失hl(m)\n"); hl=(0.0246*pow(Qs,1.75)*pow(v,0.25)*(L*1000))/pow(d,4.75); printf(" 沿程阻力損失hl hl=%0.2E\n\n",hl); ai=0.0246*pow(Qs,1.75)*pow(v,0.25

9、)/pow(d,4.75); printf(" 水力坡降ai=%f\n\n",ai); } else {lamda=(1/(1.81*log10(Re)-1.53))*(1/(1.81*log10(Re)-1.53)); printf(" 水力摩阻系數(shù) lamda=%0.4f\n\n",lamda); printf(" 選用達(dá)西公式計(jì)算沿程阻力損失hl(m)\n"); hl=(lamda*(L*1000)*(V*V))/(d*2*9.81); printf(" 沿程阻力損失hl hl=%0.

10、2E\n\n",hl); printf(" 選用列賓宗公式計(jì)算沿程阻力損失hl(m)\n"); hl=(0.0246*pow(Qs,1.75)*pow(v,0.25)*(L*1000))/pow(d,4.75); printf(" 沿程阻力損失hl hl=%0.2E\n\n",hl); ai=0.0246*pow(Qs,1.75)*pow(v,0.25)/pow(d,4.75); printf(" 水力坡降ai=%f\n\n",ai); } }//if(3000

11、***********如果流態(tài)在混合摩擦區(qū)**************/ if(Re1

12、力摩阻系數(shù) lamda=%0.4f\n\n",lamda); printf(" 選用達(dá)西公式計(jì)算沿程阻力損失hl(m)\n"); hl=(lamda*(L*1000)*(V*V))/(d*2*9.81); printf(" 沿程阻力損失hl hl=%0.2E\n\n",hl); printf(" 選用列賓宗公式計(jì)算沿程阻力損失hl(m)\n"); A=pow(10,(0.127*log10(E/(d*1000))-0.627)); hl=(0.0802*A*pow(Qs,1.877)*pow(v,0.123)*(L*10

13、00))/pow(d,4.877); printf(" 沿程阻力損失hl hl=%0.2E\n\n",hl); ai=0.0802*A*pow(Qs,1.877)*pow(v,0.123)/pow(d,4.877);; printf(" 水力坡降ai=%f\n\n",ai); }//if(Re1Re2) { printf(" /***********************************/\n")

14、; printf(" Re>Re2 粗糙區(qū) \n"); printf(" 水力摩阻選用lamda=1/pow((1.74-2*log10(E)),2);\n\n"); lamda=1/pow((1.74-2*log10(E)),2); printf(" 水力摩阻系數(shù) lamda=%0.4f\n\n",lamda); printf(" 選用達(dá)西公式計(jì)算沿程阻力損失hl(m)\n"); hl=(lamda*(L*1000)*(V*V))/(d*2*9.81); printf(" 沿程阻力損失

15、hl hl=%0.2E\n\n",hl); printf(" 選用列賓宗公式計(jì)算沿程阻力損失hl(m)\n"); N=0.11*pow(E/(d*1000),0.25); hl=(0.0826*N*(Qs*Qs)*(L*1000))/pow(d,5); printf(" 沿程阻力損失hl hl=%0.2E\n\n",hl); ai=0.0826*N*Q*Q/pow(d,5); printf(" 水力坡降ai=%f\n\n",ai); } /************管線全線所消耗的壓力能頭**************

16、/ printf(" /********************************/\n"); printf(" 管線全線所消耗的壓力能頭\n"); printf(" /********************************/\n\n"); H=hl+(Zz-ZQ)+Hsz; printf(" 末站剩余壓頭Hsz=%0.2f(m)\n\n",Hsz); printf(" 管線全線所消耗的壓力能頭H=%0.2f(m)\n\n",H); /**********************************************

17、* ***泵站數(shù)量計(jì)算 ************************************************/ { printf(" /********************************/\n"); printf(" 所需泵站數(shù)量\n"); printf(" /********************************/\n\n"); Hc=2*(386.43-0.*pow(Q,1.75)); printf(" 泵站的揚(yáng)程Hc(m) Hc=%0.2f\n\n",Hc); H=ai*L*1000+(Z

18、z-ZQ)+Hsz; printf(" 全線所需壓頭H(m)H=%0.2f\n\n",H); N=H/(Hc-hm); printf(" 全線布站個(gè)數(shù)N N=%0.1f\n\n",N); N=ceil(H/(Hc-hm)); printf(" 向上取整站數(shù)N N=%0.0f\n\n",ceil(H/(Hc-hm))); } /*********************************************** ***工藝方案經(jīng)濟(jì)計(jì)算,確定最優(yōu)方案 ******************************

19、******************/ { double Yguan, Yzhan, Yyun, YY, P; printf(" /********************************/\n"); printf(" 工藝方案經(jīng)濟(jì)計(jì)算,確定最優(yōu)方案\n"); printf(" /********************************/\n\n"); Yguan=2.4*(7.85*3.14*(D*D-d*d)*L*1000/4)*5603; printf(" 管線投資費(fèi)用 Yguan=%0.1f(元)\n\n",Ygua

20、n); printf(" 管線投資費(fèi)用 Yguan=%0.3f(億元)\n\n",Yguan/1e8); Yzhan=1.8*(N*3000e4); printf(" 站場(chǎng)投資費(fèi)用 Yzhan=%0.1f(元)\n\n",Yzhan); printf(" 站場(chǎng)投資費(fèi)用 Yzhan=%0.3f(億元)\n\n",Yzhan/1e8); /****************計(jì)算輸油泵功率*****************/ P=1.1*rowt*Qs*Hc/(102*0.807); printf(" 輸油泵站功率 P

21、=%0.2E(Kw)\n\n",P); Yyun=1.0*0.55*N*P*15*350*24; printf(" 運(yùn)營(yíng)費(fèi)用 Yyun=%0.1f(元)\n\n",Yyun); printf(" 運(yùn)營(yíng)費(fèi)用 Yyun=%0.3f(億元)\n\n",Yyun/1e8); YY=Yguan+Yzhan+Yyun; printf(" 方案總的經(jīng)濟(jì)費(fèi)用YY=%0.1f(元)\n\n",YY); printf(" 方案總的經(jīng)濟(jì)費(fèi)用YY=%0.3f(億元)\n\n",YY/1e8); } }//main() 專心---專注---專業(yè)

展開閱讀全文
溫馨提示:
1: 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
2: 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
3.本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
5. 裝配圖網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。

相關(guān)資源

更多
正為您匹配相似的精品文檔
關(guān)于我們 - 網(wǎng)站聲明 - 網(wǎng)站地圖 - 資源地圖 - 友情鏈接 - 網(wǎng)站客服 - 聯(lián)系我們

copyright@ 2023-2025  zhuangpeitu.com 裝配圖網(wǎng)版權(quán)所有   聯(lián)系電話:18123376007

備案號(hào):ICP2024067431號(hào)-1 川公網(wǎng)安備51140202000466號(hào)


本站為文檔C2C交易模式,即用戶上傳的文檔直接被用戶下載,本站只是中間服務(wù)平臺(tái),本站所有文檔下載所得的收益歸上傳人(含作者)所有。裝配圖網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)上載內(nèi)容本身不做任何修改或編輯。若文檔所含內(nèi)容侵犯了您的版權(quán)或隱私,請(qǐng)立即通知裝配圖網(wǎng),我們立即給予刪除!