|
|
发表于 2009-5-12 23:36:09
|
显示全部楼层
inspect应该不是这么用的,不知道你要解决什么问题,如果是要本程序内判断ci的大小,用if-else就可以了。如果ci不是本程序的,需要调用此程序时,可以用inspect,用法如下:
) b8 O. o- X: ?" }(number : integer)
/ e( {+ U; j; }is/ M3 X# o0 i, _
do$ m9 y: f2 z' S
inspect number9 `" ?9 l8 Q, s
when 1 then % S# S) o) q: A0 Z; `' E* h! f
print "not a prime number"
# k1 ^- O7 _' @( ]$ d% u when 2,5,7,3 then & k% v% N# {$ F2 {+ L S' e/ r3 a1 b! ^
print "prime number"
) _; _- e2 i# I when 9,4 then 7 {9 }# H4 J. Z' w* F" c
print "square number"
7 v% O ?8 s# {3 { else p2 |6 J0 o) }& `+ n% J
print "no special number";- m; J e7 M/ v4 G, q, d
print "or number greater than 9";; z/ G4 k( D% M8 K2 {7 S
end;
5 r) g8 P: t- B$ F: u. hend; |
|