| 9 | 1/1 | 返回列表 |
| 查看: 748 | 回復(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 |
» 搶金幣啦!回帖就可以得到:
+1/285
+1/179
+1/88
+1/71
+2/68
+2/44
+1/20
+1/16
+1/13
+1/12
+1/11
+1/11
+1/9
+1/8
+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ā)表 | |
|---|---|---|---|---|
|
[考研] 085600 286分 材料求調(diào)劑 +10 | 麻辣魷魚 2026-03-27 | 11/550 |
|
|---|---|---|---|---|
|
[考研] 材料科學(xué)與工程求調(diào)劑 +6 | 深V宿舍吧 2026-03-29 | 6/300 |
|
|
[考研] 考研調(diào)劑 +7 | 小蠟新筆 2026-03-29 | 7/350 |
|
|
[考研] 085600 材料與化工 329分求調(diào)劑 +14 | Mr. Z 2026-03-25 | 14/700 |
|
|
[考研] 348求調(diào)劑 +5 | 小懶蟲不懶了 2026-03-28 | 5/250 |
|
|
[考研] 305求調(diào)劑 +8 | RuiFairyrui 2026-03-28 | 8/400 |
|
|
[考研] 322求調(diào)劑 +7 | 宋明欣 2026-03-27 | 7/350 |
|
|
[考研] 生物學(xué)學(xué)碩,一志愿湖南大學(xué),初試成績338 +6 | YYYYYNNNNN 2026-03-26 | 7/350 |
|
|
[考研] 本科新能源科學(xué)與工程,一志愿華理能動285求調(diào)劑 +3 | AZMK 2026-03-27 | 5/250 |
|
|
[考研] 一志愿中南大學(xué)化學(xué)0703總分337求調(diào)劑 +5 | niko- 2026-03-27 | 5/250 |
|
|
[考研] 295求調(diào)劑 +5 | 1428151015 2026-03-27 | 6/300 |
|
|
[考研] 07化學(xué)280分求調(diào)劑 +10 | 722865 2026-03-23 | 10/500 |
|
|
[考研] 287求調(diào)劑 +10 | land xuxu 2026-03-26 | 10/500 |
|
|
[考研] 274求調(diào)劑 +17 | 顧九笙要謙虛 2026-03-24 | 23/1150 |
|
|
[考研] 324求調(diào)劑 +5 | hanamiko 2026-03-26 | 5/250 |
|
|
[碩博家園] 北京林業(yè)大學(xué)碩導(dǎo)招生廣告 +6 | kongweilin 2026-03-26 | 8/400 |
|
|
[考研] 284求調(diào)劑 +11 | junqihahaha 2026-03-26 | 12/600 |
|
|
[考研] 321求調(diào)劑 +6 | Ymlll 2026-03-24 | 6/300 |
|
|
[考研] 081200-11408-276學(xué)碩求調(diào)劑 +3 | 崔wj 2026-03-26 | 3/150 |
|
|
[考研] 求老師收我 +3 | zzh16938784 2026-03-23 | 3/150 |
|