vf初級編程題，，輸入10個數，求這10個數最大值，並求出這個最大值。。

DIMENSION a(10)

FOR i=1 TO 10

input "***輸入10個數，妳輸入第"+ALLTRIM(STR(i))+"個數是：" to a(i)

ENDFOR

FOR i=1 TO 9

FOR j=1 TO 9

IF a(j)<a(j+1)

x=a(j)

a(j)=a(j+1)

a(j+1)=x

ENDIF

ENDFOR

ENDFOR

?"最大值為：",a(1)