设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 9288|回复: 5

[求助] Inspect 编程问题

  [复制链接]
发表于 2009-5-12 20:16:59 | 显示全部楼层 |阅读模式
5仿真币
is7 f: M; k0 ?1 M: d" f8 S
       Ci :integer; qi : integer+ v7 X* }8 ~  h/ t6 ?2 X
do & o1 H% [; E* U" Y
       inspect Ci3 N/ q3 T5 \3 p1 \8 u
when Ci>0 and Ci <=150 then
) k6 c; m, x( F1 K' o, U       print qi=1;2 {2 V5 J3 D* M% `
when Ci>151 and Ci<=500 then
8 M4 d2 ?! z: B, j: K3 P       print qi=2;; I; I& i& K) X: e; F) z+ K
when Ci>501 and Ci<=700 then1 \: v# {; {# Q+ X- @
       print qi=3;4 V8 \  c& J, f. u- z6 m: f7 _- P
when Ci>701 and Ci<=1000 then7 k$ P( @" @4 o! P5 f" P7 I" ]
       print qi=4;; d1 `& Z. P/ S1 B2 r0 K
when Ci>1001 and Ci<=2000 then  v, e; `! u8 r9 p' O/ W
       print qi=5;
* F7 j' I% N4 I) Q) Ywhen Ci>2000 then
2 }# Y' g6 e' M$ x6 {       print qi=66 m2 e! ]' O5 I8 u. g( E" K  C
end;
. W& o0 D: R; l8 m# Z3 l' `3 mend;
. {$ k- m$ j) {2 u: O5 N0 m" s; W+ m; S, m6 n
          运行提示line 5附近的Ci 句法错误,想请教一下各位高手!如何解决?
  C: l$ J: f% K, ~! N$ |8 l          谢谢!

发表于 2009-5-12 23:36:09 | 显示全部楼层
inspect应该不是这么用的,不知道你要解决什么问题,如果是要本程序内判断ci的大小,用if-else就可以了。如果ci不是本程序的,需要调用此程序时,可以用inspect,用法如下:2 W: p4 K, i  U6 r, `
(number : integer)5 l) ]8 n! D/ g3 G" L6 z
is" D9 l1 d1 H& O# L' a- c. C
do
) P, x9 K; J# C. D   inspect number
$ [- F' F/ ~. D  d       when 1 then
+ y' R. n  O0 N. [: L; U- E          print "not a prime number"
, }& `4 V; @, T4 L" i# M" L" F       when 2,5,7,3 then * B4 f) K- a0 G+ x, ^7 W$ B
          print "prime number"
; c! t  ^( v. a* Y# S       when 9,4 then
" Y# \: @' z9 q  `" F          print "square number"
  u1 A1 F! g6 \% `       else
1 y6 h+ o1 D( O          print "no special number";
4 o+ X5 l+ w, N; z  U          print "or number greater than 9";
& ]9 S) {7 H; J   end;! V5 e. b2 \' d+ ~8 m5 O
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-8-24 16:54 , Processed in 0.017287 second(s), 12 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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