|
发表于 2009-5-12 23:36:09
|
显示全部楼层
inspect应该不是这么用的,不知道你要解决什么问题,如果是要本程序内判断ci的大小,用if-else就可以了。如果ci不是本程序的,需要调用此程序时,可以用inspect,用法如下:
$ y: S3 H& H9 i& f0 l# g(number : integer)% f& _3 n! Q/ z8 A6 A1 j
is
0 y0 E, k( B% |3 w; bdo
6 G- C- m. f7 Y( }. u' Y inspect number% z9 F: H' D7 l' Z3 g- D0 H9 a% j
when 1 then
5 R2 q. H/ C5 W( g$ a+ {* Y; a" Z: G print "not a prime number"
9 ]# u- \7 B$ k0 X& q when 2,5,7,3 then
9 e: N! \. Y7 n; k print "prime number"
2 B, K) x6 J& ^1 z! T$ I0 e, a when 9,4 then 0 x; Z9 J4 `) B( c
print "square number"
& j: q( D0 C8 H* V9 v4 Z& q else& f+ R1 Q0 K2 W# Z6 w4 i
print "no special number";
2 b0 ^8 O' x3 L& U print "or number greater than 9";
* C- T" u5 C# m% b' u' W' m end;
/ [7 Z9 L0 ?, b% q! ?1 Jend; |
|