| 查看: 915 | 回复: 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 |
» 猜你喜欢
售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急
已经有6人回复
售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急
已经有4人回复
售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急
已经有4人回复
小木虫上这么多卖论文的,真有人买论文么?感觉没必要啊
已经有12人回复
售SCI文章,我:8O.5.5.1O.54,科目全,可十急
已经有4人回复
售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急
已经有4人回复
各位道友,我要去昆明玩几天,回来见。
已经有8人回复
售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急
已经有4人回复
售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急
已经有7人回复
售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急
已经有8人回复
» 抢金币啦!回帖就可以得到:
祝福!基金中中中!!!!
+1/439
原创销售写了20年终于完结发表
+1/320
上海男征女 条件优秀可加微信联系
+1/260
胆酸锂 (Lithium cholate)
+1/87
中国科学院空天院精密干涉测量团队 精密机械结构工程师招聘启事
+1/83
中国科学院空天院精密干涉测量团队招聘光学/算法/机械方向博士后/特别研究助理
+1/82
东南大学杰青/海优团队招聘催化方向博士后
+1/82
物理学报录用,散币感谢合作者和审稿人
+2/28
希望这篇论文能中
+2/18
西安交通大学杜宝吉课题组招收申请考核制博士生
+2/14
论文祈福
+1/10
中山大学国家级青年人才课题组招收推免硕士2名(2027年入学)
+2/8
27推免-广州医科大学封红亮教授招收精神医学应用心理学推免生
+1/5
论文万能框架
+1/4
UTS 招收2027年入学博士生
+1/4
中国科学院生物物理研究所田勇课题组招聘联合培养生
+1/3
荷兰奈梅亨大学接收CSC博士/联培改派: 非线性网络控制
+1/3
海南大学化学院—功能分子器件团队2027博士招生+博士后招聘
+1/2
中科院理化所热声热机团队招聘电气工程专业(电机方向)博士后/特别研究助理
+1/2
悉尼科技大学(QS 第87)数据科学/AI招收2027年秋季入学全奖及CSC博士生
+1/1
★ ★
ddingqqing(金币+5): 谢谢哈。。。 2011-02-28 16:24:21
余泽成(金币+2): 谢谢参与应助! 2011-02-28 20:11:00
ddingqqing(金币+5): 谢谢哈。。。 2011-02-28 16:24:21
余泽成(金币+2): 谢谢参与应助! 2011-02-28 20:11:00
| http://unxutils.sourceforge.net/ 这里有很多unix工具的windows移植,只是awk要用gawk替换。 |
9楼2011-02-28 12:07:41
3楼2011-02-28 09:22:35
4楼2011-02-28 09:26:49
5楼2011-02-28 09:50:55











回复此楼