24小时热门版块排行榜

返回列表

当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

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)

回复此楼