DIMENSION ARRAYA(10)
FOR I=1 TO 10
INPUT "输入一个数:" TO ARRAYA(I)
ENDFOR
ASORT(ARRAYA,1,10,0)
FOR I=1 TO 10
??ARRAYA(I),","
ENDFOR
嗯,我没有学过,好像很难啊
CLEAR
DIMENSION ARRAYA(10)
FOR I=1 TO 10
INPUT "输入第"+ALLTRIM(STR(I))+"个数:" TO ARRAYA(I)
ENDFOR
ASORT(ARRAYA,1,10,0)
FOR I=1 TO 10
??ARRAYA(I),","
ENDFOR