|
|
发表于 2009-5-12 23:36:09
|
显示全部楼层
inspect应该不是这么用的,不知道你要解决什么问题,如果是要本程序内判断ci的大小,用if-else就可以了。如果ci不是本程序的,需要调用此程序时,可以用inspect,用法如下:* I# R. |! S$ Q7 S4 f+ n! ~6 u
(number : integer)5 A3 U2 F7 X) v. m4 N) U* g2 Q; o$ Q5 C
is
, M( z' q3 A. H# T) vdo7 P; H, P3 z4 i! t2 q
inspect number: i( C I9 |# b3 a' P; R
when 1 then - |5 u, s" t/ n6 A8 R' S' C, O( P; a
print "not a prime number"
1 }$ P; N; I- M2 ] when 2,5,7,3 then
( u7 K2 M* [+ b8 w8 [ print "prime number"/ K7 U) A! u1 y7 w
when 9,4 then 2 |! ?' A; g y7 N3 s
print "square number"5 m( ^5 S o! G0 d9 x
else5 D5 g9 y, |) t9 M( c# z
print "no special number";: r# Q" c; \( T
print "or number greater than 9";1 P9 W' e" j" r0 k* X" r' h
end;1 G/ H2 b! D$ A) _( Y9 Q; B: ?
end; |
|