y=0 %S.U`(.
declare X, double, 1,10 cAS_?"V
a
b U NYTF{
X(1)=(5) =]e^8;e9
X(2)=(-6)
y6}):|
X(3)=(98) lWvd"Vlt
X(4)=(-1) gf?^yP ;V
X(5)=(3) 5>)jNtZ
X(6)=(-8) d&`j8O
X(7)=(1) rzDJH:W{2
X(8)=(-5) $sZHApJV+
X(9)=(4) c'";36y
X(10)=(-3) Ib!rf:
2-aYqMmT;
u9w&q^0dqG
for a,1,10,1 v\,%)Z/
if X(a)<y then y=X(a) 2<Bv=B
else y=y 2p>SB/
endif Cg pT(E\E
print X(a)," ",y I!gj; a?R
next CDnz
&?
print "last result:", y N?0y<S ?!
Hs=N0Sk]j
一个小例子,应该可以解决你的问题