y=0 \F+".X#jh
declare X, double, 1,10 /t2H%#v{
_)YB*z5
X(1)=(5) V pY,@qh
X(2)=(-6) j+gh*\:q
X(3)=(98) $
)2zz>4
X(4)=(-1) )"2eN3H/
X(5)=(3) mjk<FXW
X(6)=(-8) ];=|))ky"
X(7)=(1) 8|L 5nQ
X(8)=(-5) i3$G)W
X(9)=(4) Pj BBXI1i
X(10)=(-3) )Q}Q -Zt
"Wb KhE
CC$rt2\e
for a,1,10,1 8f%OPcr&
if X(a)<y then y=X(a) t!B,%,Dp
else y=y v5?ct?q
endif vv5rA 6+
print X(a)," ",y gt~u/Z%
next hew"p( `
print "last result:", y fI=p^k:
\~U:k4
一个小例子,应该可以解决你的问题