设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 8689|回复: 5

[求助] Inspect 编程问题

  [复制链接]
发表于 2009-5-12 20:16:59 | 显示全部楼层 |阅读模式
5仿真币
is
  W2 G0 |: b$ q  H; K, \4 l; C# L       Ci :integer; qi : integer
. i" [1 E/ f+ ]' ~9 t* |" odo 7 ]% u  Q2 B6 K5 |8 Z
       inspect Ci# k! X, b7 Q( J2 I$ n- X9 ~' U8 Q
when Ci>0 and Ci <=150 then
7 o" U0 u( p8 c6 L& i/ g       print qi=1;+ j/ U5 G' l0 a! I: Z
when Ci>151 and Ci<=500 then5 E+ X8 A  y4 v7 ~0 J* l3 j* P) w1 Z
       print qi=2;; ^; G- ~0 @( \( ]; z0 S
when Ci>501 and Ci<=700 then$ \1 F& D+ B. T
       print qi=3;
$ @7 G# W6 t" K- a' R/ B* A' Fwhen Ci>701 and Ci<=1000 then
6 |) X# m- E1 J3 O! _: Q: \+ E       print qi=4;; W8 W; J) X) a% A2 f8 m% E
when Ci>1001 and Ci<=2000 then, D( J- B! H, G: u8 `! }
       print qi=5;% ^& Q: u; m9 r  T0 F+ U1 T
when Ci>2000 then
+ o  Y' R$ ~3 Y       print qi=6
7 i: V( n( O9 p! |* rend;! ]1 @  Z9 l) M0 u, F- g, Z
end;. x* {3 ]6 O9 m8 z. h% G
) H' |7 Q( ^& v+ ^7 N; r+ a
          运行提示line 5附近的Ci 句法错误,想请教一下各位高手!如何解决?
- l& d5 j9 O) ?# ^5 o          谢谢!

发表于 2009-5-12 23:36:09 | 显示全部楼层
inspect应该不是这么用的,不知道你要解决什么问题,如果是要本程序内判断ci的大小,用if-else就可以了。如果ci不是本程序的,需要调用此程序时,可以用inspect,用法如下:
0 }; q# ~/ j; X(number : integer)- c9 x) S7 Y- F* f$ [
is
4 B6 s/ z, J" O1 Sdo- m7 t+ }- n' b* t2 w9 V
   inspect number  |# G( E" [# q5 ]
       when 1 then 4 x, i) r1 a' q" r/ U1 M
          print "not a prime number"
4 ?" ]7 _! v+ j4 }# d       when 2,5,7,3 then
0 ~) p% z! L) _% v) a          print "prime number"
" h: v8 _. M: _, w       when 9,4 then
2 ]1 T) \, A2 r; q, `          print "square number"
4 D+ q/ N" [- [7 [       else
2 v6 E/ C, Y* q* x" k& P2 p          print "no special number";  y+ s4 v  h  R* H" ~4 W
          print "or number greater than 9";
4 S" L8 |9 [  w: X$ K   end;5 N4 l( G! a3 ~- y
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-8 06:25 , Processed in 0.013225 second(s), 12 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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