24小时热门版块排行榜    

Znn3bq.jpeg
查看: 251  |  回复: 2

oreaxle

金虫 (小有名气)

[求助] 求助一段程序的解释(不知道什么语言写的) 已有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)
回复此楼

» 猜你喜欢

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jjdg

版主 (知名作家)

优秀版主

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
oreaxle: 金币+15, ★★★★★最佳答案 2016-11-22 09:27:02
看这情况,应该是basic写的,而且是老版本的那种。就是按照前面罗列的条件来进行赋值而已,有点类似于数学里面的分段函数
努力学习!以正当途径!获得需要的知识!
2楼2016-11-21 18:34:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

oreaxle

金虫 (小有名气)

引用回帖:
2楼: Originally posted by jjdg at 2016-11-21 18:34:22
看这情况,应该是basic写的,而且是老版本的那种。就是按照前面罗列的条件来进行赋值而已,有点类似于数学里面的分段函数

谢谢
3楼2016-11-22 09:26:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 oreaxle 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 294求调剂 +8 淡然654321 2026-04-15 8/400 2026-04-15 21:47 by lbsjt
[考研] 297,工科调剂?河南农业大学本科 +11 河南农业大学-能 2026-04-14 11/550 2026-04-15 15:03 by 学员JpLReM
[考研] 297工科调剂? +14 河南农业大学-能 2026-04-13 15/750 2026-04-15 13:25 by 黑科技矿业
[考研] 一志愿鲁东大学071000生物学学硕初试分数276求调剂 +26 慕绝cc 2026-04-09 30/1500 2026-04-14 18:50 by 蔡苏阳
[考研] 272分材料子求调剂 +41 Loy0361 2026-04-10 54/2700 2026-04-14 18:00 by lhj2009
[考研] 367求调剂 +11 hffQAQ 2026-04-09 11/550 2026-04-14 17:48 by lhj2009
[考研] 26药学专硕105500求调剂 +6 喽哈加油 2026-04-13 6/300 2026-04-14 16:40 by zhouxiaoyu
[考研] 105500药学求调剂 +4 x_skys 2026-04-12 4/200 2026-04-14 13:37 by rndfc
[考研] 245求调剂 +6 冰糖橘?汽水 2026-04-13 10/500 2026-04-14 10:49 by jyl0317
[考研] 302求调剂 +10 易!? 2026-04-13 10/500 2026-04-13 19:04 by lbsjt
[考研] 化工调剂求导师收留!一志愿失利,踏实肯干,有植物提取科研经历 +20 yzyzx 2026-04-09 21/1050 2026-04-12 00:12 by 小小小小啦啦啦
[考研] 331求调剂 +5 王国帅 2026-04-11 5/250 2026-04-11 22:56 by 溪涧流水
[考研] 材料工程日语考生求调剂 +7 0856?调剂 2026-04-10 7/350 2026-04-11 21:33 by 蓝云思雨
[考研] 调剂 +5 文道星台 2026-04-11 5/250 2026-04-11 15:01 by 凯凯要变帅
[考研] 085501机械专硕 302分 不挑专业求调剂 +7 汪某. 2026-04-09 7/350 2026-04-11 14:37 by luhong1990
[考研] 296求调剂 +6 汪!?! 2026-04-09 6/300 2026-04-11 11:25 by zhq0425
[考研] 求调剂 +6 archer.. 2026-04-09 8/400 2026-04-11 10:55 by zhq0425
[考研] 一志愿京区985,085401,与本科专业一致,电子信息工程, +4 阳光开朗的男孩 2026-04-10 4/200 2026-04-10 18:27 by shenrf
[考研] 一志愿中科院105500专业总分315求调剂 +6 lallalh 2026-04-09 7/350 2026-04-09 17:51 by lallalh
[考研] 化学工程与技术专业一志愿哈工程 291分B区 国家级大创负责人 有一作论文 +13 Emmy~ 2026-04-09 13/650 2026-04-09 14:47 by only周
信息提示
请填处理意见