设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 8400|回复: 5

[求助] Inspect 编程问题

  [复制链接]
发表于 2009-5-12 20:16:59 | 显示全部楼层 |阅读模式
5仿真币
is! R" u& `1 s3 F0 d) F: Q0 U
       Ci :integer; qi : integer
! c2 t4 q4 @; E- ~% ^8 wdo
8 f0 L' r+ T) C2 G' B9 w! @$ o       inspect Ci* J# b, L# a& ~/ D$ x
when Ci>0 and Ci <=150 then
5 O6 _# m% G( d! F       print qi=1;7 _" l" l( Y! J3 ^
when Ci>151 and Ci<=500 then
1 H, A& f4 L1 _- ]       print qi=2;' @5 I' W1 E- {4 Y
when Ci>501 and Ci<=700 then
" e9 m. }. I; A  L. @: `) k& Q       print qi=3;3 J6 [% _+ T$ L$ `: W
when Ci>701 and Ci<=1000 then. \5 D$ ^, Q! L6 I
       print qi=4;
- Z4 G* c+ t! `! v2 ?# v* ?: Dwhen Ci>1001 and Ci<=2000 then5 F/ `) W& @! z' Y$ I. }" I
       print qi=5;
, I1 M5 g5 H4 X6 swhen Ci>2000 then& h9 v9 v- ?" s1 x2 {
       print qi=6) z- L& V9 }+ ]$ j# \
end;
9 o* S6 j+ w# i: xend;
( z% k9 k7 ]1 ]5 U/ g3 L& S% \4 E  F- V7 X3 G/ \. s
          运行提示line 5附近的Ci 句法错误,想请教一下各位高手!如何解决?, F& ~- o: `  ?
          谢谢!

发表于 2009-5-12 23:36:09 | 显示全部楼层
inspect应该不是这么用的,不知道你要解决什么问题,如果是要本程序内判断ci的大小,用if-else就可以了。如果ci不是本程序的,需要调用此程序时,可以用inspect,用法如下:& ]. F* c' K- c; O, F, x
(number : integer)
! C' l- V4 @& e3 `; W9 l7 yis
; y$ c, ?5 W! {6 Fdo8 k) K7 ^! B& d# Q" [
   inspect number1 C7 N! t1 |3 n
       when 1 then
0 Y+ g/ A1 [' l" L1 V          print "not a prime number"
( O& f! }& `" K" g0 D& `       when 2,5,7,3 then
/ c9 |0 q+ Q. Z( q, @          print "prime number". X! K! Y+ w1 W6 F4 p/ `+ j
       when 9,4 then
8 G4 @9 i" E8 _1 h7 R          print "square number"+ i, N$ j& R: a+ L( F" Y
       else, d+ Q+ c. b' Q. O+ z
          print "no special number";! A+ S8 z0 l! S; T- I! y4 e1 |5 F
          print "or number greater than 9";
6 i& B+ @2 ^' v* A   end;  K; |3 G% L  o8 v
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-23 13:28 , Processed in 0.017266 second(s), 12 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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