[quote][quote]cls
dim a(20)
for i=1 to 20:a(i)=int(rnd*90)+10:next i
for i=1 to 19
for j=i+1 to 20
if a(i)>a(j) then swap a(i),a(j)
next j,i
for i=1 to 20:print a(i),:next i
end[/quote]
[/quote]

CLS
DIM A(20)
RANDOMIZE TIMER
FOR I=1 TO 20
  A(I)=INT(RND*80)+11
NEXT I
FOR I=1 TO 19
  FOR J=I+1 TO 20
    IF A(I)<A(J) THEN SWAP A(I),A(J)
NEXT J,I
FOR I=1 TO 20
  PRINT A(I);
NEXT I
END