|
|
发表于 2009-5-12 23:36:09
|
显示全部楼层
inspect应该不是这么用的,不知道你要解决什么问题,如果是要本程序内判断ci的大小,用if-else就可以了。如果ci不是本程序的,需要调用此程序时,可以用inspect,用法如下:
/ X* n, y1 }- }# i- i& A: x( c(number : integer)
& A1 M6 [. }7 f) dis
# ? Z( e# i1 p( z9 ]do' L1 D. N* v, b9 q; V
inspect number
! v: Q! X; e, W6 z9 Y9 Z! o when 1 then 0 |' ^/ K$ X( b; ^; q
print "not a prime number"' n2 a3 Q$ k X- E: `
when 2,5,7,3 then 4 Q7 D. r, K9 }/ V! J
print "prime number"
j% f8 ?# S% k9 y when 9,4 then
9 V( U1 x* _; |& x. g2 Y! x. O print "square number"
3 A& w2 h, b# Z1 \ Q9 F9 H7 E else
/ o+ r) L$ X5 d, ] print "no special number";
9 G% z# H2 i+ C" Z) P+ ~ print "or number greater than 9";. _6 ^1 ^4 G3 `' i
end;
& n8 x& E; b, _- |7 e3 G" vend; |
|