设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 8356|回复: 5

[求助] Inspect 编程问题

  [复制链接]
发表于 2009-5-12 20:16:59 | 显示全部楼层 |阅读模式
5仿真币
is. ?: b' I5 X6 `2 j" M) N
       Ci :integer; qi : integer
; W% z6 d# Z3 S) a8 wdo
2 F, l+ d6 m" {3 g' p       inspect Ci
% O1 N$ s* S& Twhen Ci>0 and Ci <=150 then 8 _2 T5 I4 [( H
       print qi=1;5 [0 h6 ~+ k0 v4 `/ g9 e, J
when Ci>151 and Ci<=500 then
% \3 o% x% i- |+ X/ H6 r       print qi=2;2 q' |/ z, w' N% ~9 q
when Ci>501 and Ci<=700 then( b' K, G3 D# O% _! W% H
       print qi=3;: p- Y6 Q( I6 v& y6 E1 w
when Ci>701 and Ci<=1000 then, K  L5 g0 o+ g- r  ~, w! l
       print qi=4;
9 L3 l5 C2 h1 swhen Ci>1001 and Ci<=2000 then
) `/ R7 B% ]/ T: t9 m$ `& v$ [       print qi=5;
7 |0 y) A( V( D+ h' z9 G  c) awhen Ci>2000 then
% [" a2 k* l: _6 {& I# \       print qi=6
7 Y4 |! q" y) V  Rend;3 ?" d  Y/ v: J# k( z5 B2 Y: n
end;+ L; |, L! L4 X2 t" g

8 G3 S% g+ y- P  @+ X8 }4 }          运行提示line 5附近的Ci 句法错误,想请教一下各位高手!如何解决?8 I/ }/ q' p9 }5 u- M+ y
          谢谢!

发表于 2009-5-12 23:36:09 | 显示全部楼层
inspect应该不是这么用的,不知道你要解决什么问题,如果是要本程序内判断ci的大小,用if-else就可以了。如果ci不是本程序的,需要调用此程序时,可以用inspect,用法如下:( w" s% T- |8 F% m, h4 k2 u$ K
(number : integer)1 X! G9 s( u+ @6 S: c1 D0 S
is1 c- Q2 S" z% ~  J  E
do9 F  J, B: e# k% q2 d1 b) O8 T7 V2 D
   inspect number- C: ~% E  \+ Z# g
       when 1 then ! L* P0 ^! ~% }1 U. b, N+ b
          print "not a prime number"
; k' z1 S: ~" K0 Z* g/ K. y, f# b       when 2,5,7,3 then
) X. w: Y% F7 s' O( D* o4 t          print "prime number"1 V+ b& V) Z! ?* q  l- a1 o
       when 9,4 then
  Y6 F$ c$ i( g: S          print "square number"% G" Z( K+ u  i- X) x2 @
       else; G2 r" l  ^! R1 t. A3 {0 l
          print "no special number";
: D( @: {  n5 _, f$ c          print "or number greater than 9";; F( l" K) U2 x% \( O8 @3 n. ?
   end;
2 D2 u& i  r: ?/ T# }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-4-20 13:50 , Processed in 0.014240 second(s), 12 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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