|
|
发表于 2009-5-12 23:36:09
|
显示全部楼层
inspect应该不是这么用的，不知道你要解决什么问题，如果是要本程序内判断ci的大小，用if-else就可以了。如果ci不是本程序的，需要调用此程序时，可以用inspect，用法如下：
* p. A* W) V+ S: ]" O(number : integer)
6 }, Z I, `; O- K3 {/ Z- K$ jis0 X; Z7 L6 H/ I; r5 {$ l
do
- E. i7 W8 z) }, Y' a# t inspect number& }# r: o/ a0 _6 Y6 G; N/ b
when 1 then 3 ~; E# I+ P/ s
print "not a prime number"
) K! w) y' s) a. Z- X. Y7 f) F when 2,5,7,3 then 4 R7 m" |: F& a
print "prime number"
# p/ s+ T7 }4 T% T+ D1 h, q/ k3 J when 9,4 then # c H/ p ~6 M, [) @
print "square number"8 \* ]' G: J& p8 j8 g4 u
else! C8 M" t4 }" b) x8 f0 R
print "no special number";0 o5 f2 C+ v+ {5 j4 G8 c9 K
print "or number greater than 9";5 v+ Z. G& R! G0 l4 }3 ?
end;
4 A; t6 ^4 }2 gend; |
|
[复制链接]
楼主