24小时热门版块排行榜

>论坛更新日志 (4020)
>导师招生 (645)
>考博 (474)
>虫友互识 (278)
>文献求助 (263)
>招聘信息布告栏 (226)
>休闲灌水 (223)
>物理 (141)
>硕博家园 (77)
>学术会议 (52)
>博后之家 (51)
>论文投稿 (49)
>海外博后 (44)
>教师之家 (36)
>基金申请 (27)
>外文书籍求助 (20)

返回列表

oreaxle

金虫 (小有名气)

应助: 4 (幼儿园)
金币: 17.8
散金: 501
红花: 1
帖子: 130
在线: 94小时
虫号: 3001801
注册: 2014-02-27
性别: GG
专业: 传热传质学

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

回复此楼