| 查看: 238 | 回复: 2 | ||
[求助]
求助一段程序的解释(不知道什么语言写的) 已有1人参与
|
|
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) |
» 猜你喜欢
基金正文30页指的是报告正文还是整个申请书
已经有4人回复
今年春晚有几个节目很不错,点赞!
已经有6人回复
球磨粉体时遇到了大的问题,请指教!
已经有15人回复
过年走亲戚时感受到了所开私家车的鄙视链
已经有5人回复
情人节自我反思:在爱情中有过遗憾吗?
已经有5人回复
江汉大学解明教授课题组招博士研究生/博士后
已经有3人回复
jjdg
版主 (知名作家)
- 程序强帖: 9
- 应助: 223 (大学生)
- 贵宾: 3.926
- 金币: 51005.2
- 红花: 238
- 帖子: 7227
- 在线: 474.2小时
- 虫号: 27000
- 注册: 2003-10-21
- 专业: 药物代谢与药物动力学
- 管辖: 程序语言

2楼2016-11-21 18:34:22
3楼2016-11-22 09:26:49













回复此楼