| 查看: 151 | 回复: 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) |
» 猜你喜欢
职称评审没过,求安慰
已经有56人回复
最近几年招的学生写论文不引自己组发的文章
已经有5人回复
26申博自荐
已经有3人回复
A期刊撤稿
已经有4人回复













回复此楼