Mi spieghi il ragionamento (errato) che hai usato per l'algoritmo di ordinamento?
codice:
DO UNTIL A1$ < A2$
   F$ = A1$
   A1$ = A2$
   A2$ = f$
LOOP
Tutti in sequenza?
Praticamente esegui UNA SOLA VOLTA queste istruzioni nel caso il primo sia minore del secondo, il secondo minore del terzo, il terzo minore del quarto...

Questo porta in ultima posizione il più grande... e gli altri? Per poter fare quello che intendi fare devi appoggiarti ad un ARRAY. Inserire tutti i nomi nell'array e, tramite indicizzazione, controllarli tutti (nel caso di un bubble sort, come hai tentato di fare):
codice:
DIM A(1 TO 10) AS STRING
FOR I=1 TO 10
   INPUT "Inserire nome: ", A(I)
NEXT

FOR I=1 TO 9
   FOR J=I TO 10
      IF A(I) > A(J) THEN
         F$ = A(I)
         A(I) = A(J)
         A(J) = F$
      END IF
   NEXT
NEXT

FOR I=1 TO 10
   PRINT A(I); " ";
NEXT
Se non ho sbagliato qualcosa dovrebbe andare.


Ciao.