y=0 <S7SH-{_\
declare X, double, 1,10 K:<Viz
@ntwdv;
X(1)=(5) Ag\RLJ.KD
X(2)=(-6) 9Cd/SlNV2
X(3)=(98) KxKZC}4m
X(4)=(-1) 25`W"x_
X(5)=(3) dpS@:
X(6)=(-8) \H>T[
X(7)=(1) -6-rXD
X(8)=(-5) S) zw[m
X(9)=(4) T=pP
X(10)=(-3) JXkx!X_{
k]:`<`/I_
2"a%%fv
for a,1,10,1 ,{:qbt
if X(a)<y then y=X(a) d_$0
else y=y dL4VcUS.
endif Xlug{ Uh
print X(a)," ",y ;sYDs71y
next B=>Xr!pM!
print "last result:", y |7,$.MK-@
}OcrA/
一个小例子,应该可以解决你的问题