inspect应该不是这么用的,不知道你要解决什么问题,如果是要本程序内判断ci的大小,用if-else就可以了。如果ci不是本程序的,需要调用此程序时,可以用inspect,用法如下:6 h4 d$ u* m7 U# H% N4 H0 u
(number : integer) & |( B5 y9 N# ^# K7 ]* J0 s: e( L1 Sis1 J% n; j2 A; n' z( c8 q
do . K e: p% W+ C/ Y. i* V inspect number " Z; V/ t7 C9 s$ X0 r: G5 t2 i when 1 then 0 x) E5 E; a1 D
print "not a prime number" 1 M# Y) [% d6 E* b when 2,5,7,3 then . S0 }: L0 s; d: B" o6 S0 U print "prime number"2 q/ x% K \/ B& A
when 9,4 then 9 o8 ? x! q5 t4 r Q2 ^ print "square number" & B2 B$ U" ]& G% y0 u else : [- G7 S" \& n& ]" Q* s0 r print "no special number"; & ~$ V6 e% l; M+ N. W print "or number greater than 9"; ! c' F! l; {2 o$ n) ?3 W+ r; x end; 0 {+ z. Q- q- Z6 E o! F' zend;