|
发表于 2009-5-12 23:36:09
|
显示全部楼层
inspect应该不是这么用的,不知道你要解决什么问题,如果是要本程序内判断ci的大小,用if-else就可以了。如果ci不是本程序的,需要调用此程序时,可以用inspect,用法如下:
# J- P" u1 W) n(number : integer)) ?$ ^; ^! p2 x0 Y
is
. L4 K f* T, W# _do- ?8 v* _5 p/ L$ E+ Z8 C3 R
inspect number
6 b; W7 w* }& n( e- ]! v7 r5 { when 1 then / b1 A( V- P( q$ h
print "not a prime number"
4 P5 V( o$ n9 L$ i2 a2 `$ c when 2,5,7,3 then
( Q; O6 }$ {# }3 [# A* I& A print "prime number"# F1 ~ k+ O) L& P
when 9,4 then 7 {/ W/ a1 [; g
print "square number"& }+ i" l w0 c/ h( }' y
else
% C7 u5 d1 C! e. d print "no special number";- p% K3 `" A; \$ N) l
print "or number greater than 9";
3 s7 r& @7 G; D! I1 S2 e end;
g* x* s p2 y$ x2 Yend; |
|