设为首页收藏本站

最大的系统仿真与系统优化公益交流社区

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 8675|回复: 5

[求助] Inspect 编程问题

  [复制链接]
发表于 2009-5-12 20:16:59 | 显示全部楼层 |阅读模式
5仿真币
is
# ?( y8 ]# i+ x5 I3 W* K: Y       Ci :integer; qi : integer( m" Y2 u) J7 i( e
do
- s" F! O. l1 g' \+ {+ b9 Q% D       inspect Ci' d4 o; t" G+ E. ^$ d5 o$ z( V# B
when Ci>0 and Ci <=150 then
7 g; ]+ [. n0 v' L4 t* m! ~       print qi=1;3 ~+ K1 R/ f; ^8 @/ D7 X
when Ci>151 and Ci<=500 then
4 k2 l% b* N8 D- A8 U) q' Y       print qi=2;
1 W6 p9 d! \% s# }4 d; S( lwhen Ci>501 and Ci<=700 then
4 O1 D- M* r; J6 M8 l8 [' h) c4 M) y       print qi=3;
1 Z  x: _) L' E3 hwhen Ci>701 and Ci<=1000 then( Q0 j8 _# p! Y: D# @/ Q  K
       print qi=4;6 P6 M3 Y: T/ |$ y- ^4 u
when Ci>1001 and Ci<=2000 then! M& E/ Z" p' @7 |  V5 \
       print qi=5;
* k- k& W' n$ h* d2 O/ Awhen Ci>2000 then+ P# I$ z' ^8 [
       print qi=6: N3 p# M1 w' {# A  ]
end;3 |% Z3 Q* e2 d9 g5 k
end;* k* N- X. W$ Q

5 B5 t9 t  U! R          运行提示line 5附近的Ci 句法错误,想请教一下各位高手!如何解决?
2 Q; L/ b% D7 ?# f          谢谢!

发表于 2009-5-12 23:36:09 | 显示全部楼层
inspect应该不是这么用的,不知道你要解决什么问题,如果是要本程序内判断ci的大小,用if-else就可以了。如果ci不是本程序的,需要调用此程序时,可以用inspect,用法如下:9 o8 K! H* R: G. ?2 A
(number : integer)
, r+ Q5 w9 `! \" O. y+ R0 g! |is! q+ S3 \# K# X2 o9 X; O( `8 z
do# k  u" o  o1 q! S! b% X
   inspect number
' ~' _' B3 F% a3 N! ^       when 1 then
& e. Q) q" G; u, H  l          print "not a prime number"
/ j, M6 n' m  U: q; C       when 2,5,7,3 then / O: S% h! P: N4 E& I3 n
          print "prime number"
# F& G! H4 L0 O0 m- D       when 9,4 then 5 x$ C* t, N2 I" g1 Q8 x7 v: s
          print "square number"
0 u% q" z# t: k* Q% }       else
4 m* n5 ^& |( a. g          print "no special number";, g* n/ o, L& B$ _) D
          print "or number greater than 9";1 N- i: O2 b( n5 N# g# v; v
   end;( w4 S# I  S$ U6 y# r, T7 `& x# {4 K
end;
 楼主| 发表于 2009-5-13 10:00:51 | 显示全部楼层
我在做一个集装箱码头泊位—岸桥分配的仿真优化模型,我是新手,有很多问题需要请教,高手liysunny能否帮忙,我的qq:540966007。谢谢!!!
发表于 2009-5-13 17:55:54 | 显示全部楼层
发表于 2009-9-15 10:16:40 | 显示全部楼层
楼主Ci没有赋值,应先赋值,再判断
发表于 2010-10-19 09:44:36 | 显示全部楼层
二楼说得很对啊,版主为啥没给加分呢?
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|手机版|SimulWay 道于仿真   

GMT+8, 2026-6-4 11:45 , Processed in 0.013128 second(s), 12 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表