| 查看: 175 | 回复: 0 | ||
[求助]
求助一段程序的解释(不知道什么语言写的)
|
|
select case REG(NDATA) case is =< 1000 select case REF(NDATA) case is =< 1000 CC(NDATA)=5 case is >1000 select case REF(NDATA) case is <2000 CC(NDATA)=(5/1000)*REF(NDATA) case is => 2000 CC(NDATA)=10 end select end select case is > 1000 select case REG(NDATA) case is <2000 select case REF(NDATA) case is =< 1000 CC(NDATA)=(7/1000)*REG(NDATA)-2 case is >1000 select case REF(NDATA) case is <2000 CC(NDATA)=((3/1000)*REG(NDATA)+2)*(REF(NDATA)/1000)+(4/1000)*REG(NDATA)-4 case is => 2000 CC(NDATA)=(10/1000)*REG(NDATA) end select end select case is =>2000 select case REF(NDATA) case is =< 1000 CC(NDATA)=12 case is >1000 select case REF(NDATA) case is <2000 CC(NDATA)=(8/1000)*REF(NDATA)+4 case is => 2000 CC(NDATA)=20 end select end select end select end select DPG(NDATA)=2*FG(NDATA)/DD*MG*JG(NDATA)^2 DPF(NDATA)=2*FF(NDATA)/DD*MF*JF(NDATA)^2 XX(NDATA)=sqr(DPf(NDATA)/DPg(NDATA)) DPT(NDATA)=DPF(NDATA)*(1+CC(NDATA)/XX(NDATA)+1/XX(NDATA)^2) EPS(NDATA)=(JG(NDATA)+JF(NDATA))/(VOID(NDATA)*MG+(1-VOID(NDATA))*MF)*DPT(NDATA) |
» 猜你喜欢
今年审到国自然15份,谈谈感受
已经有7人回复
光量子物理方向 博士招生 1人(2026.09)
已经有4人回复
上海大学实验技术岗位非升即走
已经有6人回复
西南大学考核制博士
已经有8人回复
这年头没有找到涵评专家,还有中面上的可能吗
已经有16人回复
26/27博士推荐
已经有3人回复
找博士生导师
已经有4人回复
重磅!青年科学基金项目(C类)资助增幅预计超过50%
已经有9人回复
售SCI一区T0P文章,我:8.O.5.5.1.O.5.4,科目齐全,可+急
已经有4人回复
售SCI一区T0P文章,我:8.O.5.5.1.O.5.4,科目齐全,可+急
已经有4人回复












回复此楼
精华III:
20