| 9 | 1/1 | 返回列表 |
| 查看: 757 | 回復: 8 | |||
[交流]
【求助】求助這個程序是用什么編的,如何運行///
|
|
BEGIN{ componente="NH4NO3" R=0 n[2]=2;t[n[2]]=0;w[n[2]]=54.2 n[3]=3;t[n[3]]=5;w[n[3]]=57 n[4]=4;t[n[4]]=10;w[n[4]]=60 n[5]=5;t[n[5]]=15;w[n[5]]=62.8 n[6]=6;t[n[6]]=20;w[n[6]]=65.5 n[7]=7;t[n[7]]=25;w[n[7]]=68.2 n[8]=8;t[n[8]]=30;w[n[8]]=70.4 n[9]=9;t[n[9]]=32.3;w[n[9]]=71.0 n[10]=10;t[n[10]]=35;w[n[10]]=72.3 n[11]=11;t[n[11]]=40;w[n[11]]=74.6 n[12]=12;t[n[12]]=45;w[n[12]]=76.3 n[13]=13;t[n[13]]=50;w[n[13]]=77.8 n[14]=14;t[n[14]]=55;w[n[14]]=79.3 n[15]=15;t[n[15]]=60;w[n[15]]=80.7 n[16]=16;t[n[16]]=65;w[n[16]]=82 n[17]=17;t[n[17]]=70;w[n[17]]=83.3 n[18]=18;t[n[18]]=75;w[n[18]]=84.6 n[19]=19;t[n[19]]=80;w[n[19]]=85.7 n[20]=20;t[n[20]]=85;w[n[20]]=86.9 n[21]=21;t[n[21]]=90;w[n[21]]=88.2 n[22]=22;t[n[22]]=95;w[n[22]]=89.3 n[23]=23;t[n[23]]=100;w[n[23]]=90.3 } { if($1==componente&&$2=="r" ![]() { ra0=$3 ra1=$4-63- pruefe1=1 } if($1==componente&&$2=="dataE" ![]() { ea0=$3 ea1=$4 pruefe2=1 } if($1==componente&&$2=="molmasse" ![]() { molmasse=$3 pruefe3=1 } } END{ if(pruefe1!=1) print"Die parameter,r,von",componente,"befinde if(pruefe2!=1) print"Die parameter,e,von",componente,"befinde if(pruefe3!=1) print"Die Molmasse von",componente,"befindet s for(i in n) { T=t[n]+273.15 W=w[n] r=ra0+ra1*0.001*T E=(ea0+ea1*0.01*T)*1000 x=W/molmasse/(W/molmasse+(100-W)/18) H=1-x A=x ca=exp(-1*E/8.314/T) a1=ca-1 b1=-ca*(H+r*A) c1=ca*r*A*H X1=(-b1+sqrt(b1^2-4*a1*c1))/(2*a1)X2=(-b1-sqrt(b1^2-4*a1*c1))/(2*a1) X=X2 lnaA=r*log((r*A-X)/(r*A)) aW=(H-X)/H lnk=lnaA+R*log(aW) print 1/T,lnk,x,H,r,X,lnaA,aW,T } }#end END |
» 搶金幣啦!回帖就可以得到:
+1/36
+1/35
+1/33
+1/20
+1/14
+1/11
+1/11
+1/10
+1/9
+1/9
+1/8
+1/8
+1/7
+1/6
+1/6
+1/5
+1/3
+1/2
+1/2
+1/1
| awk寫的 |
至尊木蟲 (職業(yè)作家)
| http://unxutils.sourceforge.net/ 這里有很多unix工具的windows移植,只是awk要用gawk替換。 |
| 9 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 一志愿華中師范化學332分求調(diào)劑 +3 | Lyy930824@ 2026-03-29 | 3/150 |
|
|---|---|---|---|---|
|
[考研] 一志愿鄭州大學,080500學碩,總分317分求調(diào)劑 +10 | 舉個栗子oi 2026-03-24 | 11/550 |
|
|
[考研] 0703化學321分求調(diào)劑 +10 | 三dd. 2026-03-30 | 11/550 |
|
|
[考研] 化學0703 調(diào)劑 306分 一志愿211 +8 | 26要上岸 2026-03-28 | 8/400 |
|
|
[考研] 【求調(diào)劑】085601材料工程專碩 | 總分272 | +7 | 腳滑的守法公民 2026-03-27 | 7/350 |
|
|
[考研] 343求調(diào)劑085601 +3 | 要努力學習x 2026-03-29 | 3/150 |
|
|
[考研] 289求調(diào)劑 +5 | BrightLL 2026-03-29 | 5/250 |
|
|
[考研] 327求調(diào)劑 +6 | 汲亦昊 2026-03-29 | 6/300 |
|
|
[考研] 壓國家一區(qū)線,求導師收留,有恩必謝! +7 | 迷人的哈哈 2026-03-28 | 7/350 |
|
|
[考研] 394求調(diào)劑 +3 | 好事多磨靜候佳?/a> 2026-03-26 | 5/250 |
|
|
[考研] 347求調(diào)劑 +3 | 山頂見α 2026-03-25 | 3/150 |
|
|
[考研] 0856,材料與化工321分求調(diào)劑 +12 | 大饞小子 2026-03-27 | 13/650 |
|
|
[有機交流]
高溫高壓反應求助
10+4
|
chibby 2026-03-25 | 4/200 |
|
|
[考研] 292求調(diào)劑 +4 | 求求了收下我吧?/a> 2026-03-26 | 4/200 |
|
|
[考研] 324求調(diào)劑 +5 | hanamiko 2026-03-26 | 5/250 |
|
|
[考研] 321求調(diào)劑 +6 | Ymlll 2026-03-24 | 6/300 |
|
|
[考研] 085601求調(diào)劑總分293英一數(shù)二 +4 | 鋼鐵大炮 2026-03-24 | 4/200 |
|
|
[考研] 一志愿哈工大,085400,320,求調(diào)劑 +4 | gdlf9999 2026-03-24 | 4/200 |
|
|
[考研] 材料與化工304求B區(qū)調(diào)劑 +3 | 邱gl 2026-03-25 | 3/150 |
|
|
[考研]
|
13659058978 2026-03-24 | 4/200 |
|