| 9 | 1/1 | 返回列表 |
| 查看: 747 | 回復(fù): 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 |
» 搶金幣啦!回帖就可以得到:
+2/154
+1/93
+1/84
+1/81
+1/80
+2/68
+2/46
+1/42
+1/40
+1/37
+1/20
+1/14
+1/11
+1/8
+1/8
+1/6
+1/5
+1/3
+1/2
+1/2
| awk寫的 |
至尊木蟲 (職業(yè)作家)
| http://unxutils.sourceforge.net/ 這里有很多unix工具的windows移植,只是awk要用gawk替換。 |
| 9 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 南京大學(xué)化學(xué)調(diào)劑 +8 | 景隨風(fēng) 2026-03-29 | 11/550 |
|
|---|---|---|---|---|
|
[考研] 一志愿北京工業(yè)大學(xué),324分求調(diào)劑 +5 | 零八# 2026-03-28 | 5/250 |
|
|
[基金申請] 面上5B能上會嗎? +4 | redcom 2026-03-29 | 4/200 |
|
|
[考研] 327求調(diào)劑 +6 | 汲亦昊 2026-03-29 | 6/300 |
|
|
[考研] 297求調(diào)劑 +11 | 田洪有 2026-03-26 | 11/550 |
|
|
[考研] 070300化學(xué)354求調(diào)劑 +6 | 101次希望 2026-03-28 | 6/300 |
|
|
[考研] 0703 化學(xué) 求調(diào)劑,一志愿山東大學(xué) 342 分 +4 | Shern—- 2026-03-28 | 4/200 |
|
|
[考研] 食品工程專碩一志愿中海洋309求調(diào)劑 +4 | 小張zxy張 2026-03-26 | 8/400 |
|
|
[考研] 311(085601)求調(diào)劑 +4 | liziyeyeye 2026-03-28 | 4/200 |
|
|
[考研] 壓國家一區(qū)線,求導(dǎo)師收留,有恩必謝! +7 | 迷人的哈哈 2026-03-28 | 7/350 |
|
|
[考研] 312,生物學(xué)求調(diào)劑 +3 | 小譯同學(xué)abc 2026-03-28 | 3/150 |
|
|
[考研] 285求調(diào)劑 +4 | AZMK 2026-03-27 | 7/350 |
|
|
[考研] 085600,材料與化工321分,求調(diào)劑 +9 | 大饞小子 2026-03-27 | 9/450 |
|
|
[考研] 342求調(diào)劑 +3 | 加油a李zs 2026-03-26 | 3/150 |
|
|
[考研] 化學(xué)調(diào)劑一志愿上海交通大學(xué)336分-本科上海211 +4 | 小魚愛有機 2026-03-25 | 4/200 |
|
|
[考研] 材料與化工328分調(diào)劑 +6 | 。,。,。,。i 2026-03-23 | 6/300 |
|
|
[考研] 考研一志愿蘇州大學(xué)初始315(英一)求調(diào)劑 +3 | sbdksD 2026-03-24 | 4/200 |
|
|
[考研] 0854人工智能方向招收調(diào)劑 +4 | 章小魚567 2026-03-24 | 4/200 |
|
|
[考研] 340求調(diào)劑 +5 | 話梅糖111 2026-03-24 | 5/250 |
|
|
[考研] 284求調(diào)劑 +3 | yanzhixue111 2026-03-23 | 6/300 |
|