设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 6606|回复: 5

[求助] Inspect 编程问题

  [复制链接]
发表于 2009-5-12 20:16:59 | 显示全部楼层 |阅读模式
5仿真币
is1 @4 h+ x* ?- B) V# H) V
       Ci :integer; qi : integer/ a. J7 H/ w; q$ E6 d
do $ T& X, E- T- t+ R5 R
       inspect Ci- Z( H1 l2 k! j0 }& E/ T
when Ci>0 and Ci <=150 then 8 `. W7 {- W! z
       print qi=1;
- h1 W+ K4 ~, }3 v$ R! ~when Ci>151 and Ci<=500 then) p1 q+ T. V- Y1 d/ R; s4 X! ~
       print qi=2;
* R+ v8 L( b8 {7 _, W# J  q2 xwhen Ci>501 and Ci<=700 then3 j. u) D( m6 o' _. g$ `& B
       print qi=3;
. b3 ]5 ^% H+ }  Zwhen Ci>701 and Ci<=1000 then
$ ?' Z. w0 E6 U+ p       print qi=4;" ~5 ?) H! Z( w; B( @) F
when Ci>1001 and Ci<=2000 then
' `6 B# f2 T$ ?       print qi=5;+ W& x( z0 [$ o
when Ci>2000 then4 n- x# Y3 p; s7 z1 M, @
       print qi=6
8 ~) I" n: q" G$ n  `end;
$ M6 W/ V* `& ]9 k  O0 S" S+ Dend;/ T7 ]' D! N( j, ]6 E

7 ?0 ?7 l: G7 A  U* X, a          运行提示line 5附近的Ci 句法错误,想请教一下各位高手!如何解决?
* K3 f! t3 g- @, Q4 }! w          谢谢!

发表于 2009-5-12 23:36:09 | 显示全部楼层
inspect应该不是这么用的,不知道你要解决什么问题,如果是要本程序内判断ci的大小,用if-else就可以了。如果ci不是本程序的,需要调用此程序时,可以用inspect,用法如下:
0 u: G) b. z' u% G; R(number : integer)  A7 n& O% W" k1 {  _
is6 H- z. Y: r8 v9 V
do- I5 E0 x- V* P9 R: ]9 d
   inspect number8 b5 `7 y4 ]: N- E- R# {' m7 L; X/ Q
       when 1 then & ]" s( k: w1 h' v8 y) l* i! O
          print "not a prime number"2 c" f  k7 d6 y8 K: E% j
       when 2,5,7,3 then
9 N, f: z* g+ C0 p          print "prime number"
+ y4 H8 C9 ?4 t% ?3 q5 k       when 9,4 then
: z) d4 U; D- ]0 e, ?: ]          print "square number"3 k+ M8 K2 L$ g' G. D5 d. ]- h
       else) Y' M$ H* l5 s& K5 Q  L
          print "no special number";
/ U# t" }/ ~9 w  {9 R$ s          print "or number greater than 9";
( F, u  [+ x' o% f; T4 B   end;
4 p+ \6 j% X8 ~- p+ G8 Eend;
 楼主| 发表于 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, 2025-7-19 07:43 , Processed in 0.012328 second(s), 11 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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