y=0 pO.2<
declare X, double, 1,10 Pco'l#:
~3S~\0&|
X(1)=(5) Q1l '7N
X(2)=(-6) R^e.s
-
X(3)=(98) OaZQ7BGq
X(4)=(-1) :U(A;U1,
X(5)=(3) T${Q.zHY[!
X(6)=(-8) BI}Cg{^km
X(7)=(1) =iD3Yt
X(8)=(-5) j9OG\m
X(9)=(4) .k
\@zQ|Ta
X(10)=(-3) @{pLk4E
-\n@%$M]G
M {Q;:
for a,1,10,1 .q 3/_*
if X(a)<y then y=X(a) g
SAt@2*U2
else y=y BFJnV.0M!
endif FtC^5{V+V
print X(a)," ",y 8&Y^""#e)
next [,KXze_m
print "last result:", y R+,u^;\
{s{j~M
一个小例子,应该可以解决你的问题