y=0 Ek1c >s,t
declare X, double, 1,10 *MB>,HU
N<1+aL\
X(1)=(5) _ OC@J*4.
X(2)=(-6) ?xrOhA9
X(3)=(98) vxHFNGI
X(4)=(-1) Qz3Z_V4k9
X(5)=(3) Ulx]4;uzf
X(6)=(-8) %IZd-N7i^
X(7)=(1) yOt#6Vw
X(8)=(-5) rlD!%gG2x
X(9)=(4) &a;?o~%*]i
X(10)=(-3) a6-.|tt#t
px"H
QW$p{ zo
for a,1,10,1 Zskj?+1
if X(a)<y then y=X(a) 6y~F'/ww
else y=y QeG9CS)E}j
endif Mx$&{.LFJ
print X(a)," ",y W"^ =RY
next !Av9?Q:
print "last result:", y marZA'u%B1
P6R_W
一个小例子,应该可以解决你的问题