|
发表于 2009-5-12 23:36:09
|
显示全部楼层
inspect应该不是这么用的,不知道你要解决什么问题,如果是要本程序内判断ci的大小,用if-else就可以了。如果ci不是本程序的,需要调用此程序时,可以用inspect,用法如下:0 i- |( o C6 K# F2 ^
(number : integer)& a. e* G# A! r2 \8 N& l; {; t
is
. F, o4 S% ^; p% g* J+ Z. }do. ?# O' X' ~8 r/ Y! ^" E$ q
inspect number! J( H9 e/ \! {: R- x3 V' q
when 1 then
0 p6 {; L$ A. z" r print "not a prime number"
6 ]4 B; i" A# ~- `+ A when 2,5,7,3 then 3 {/ Z5 t' r: {' E% Y5 t1 r
print "prime number"
3 `$ X8 X$ z9 Y0 p when 9,4 then 9 j0 D+ _1 @& t% r4 V: ~
print "square number") j0 P# k3 D _9 x) n* u
else
( K# T/ c# t; j3 Y2 p) M% G* M) n print "no special number";
) Y: P" [/ V, f) j( f& _ print "or number greater than 9";: d5 d' v& J1 o i3 G8 z
end;
; [+ }( w; K, {' N f5 {1 Hend; |
|