y=0 'tkQz
declare X, double, 1,10 v~AshmP
eV(.\Lj
X(1)=(5) O251. hXK
X(2)=(-6) @b 17jmq{
X(3)=(98) y[Dgyt
X(4)=(-1) F
]D^e{y
X(5)=(3) wpN [0^M-0
X(6)=(-8) jT0iJ?d,!
X(7)=(1) y"Fu=
X(8)=(-5) Vr&
GsT
X(9)=(4) hJ%$Te
X(10)=(-3) lBG=jOS
v h)CB8
R86i2',
for a,1,10,1 6*$A/D
if X(a)<y then y=X(a) #%$@[4"V
else y=y qh}+b^Wi
endif Z?[R;V1j
print X(a)," ",y KMfIp:~
next @JdeOL;
print "last result:", y 1xkk5\3]
m7A3i<6p
一个小例子,应该可以解决你的问题