Fonctions de Chaînes

Le point de départ de votre tableau est spécifié par le paramètre a$(0), et il doit toujours être fixé au premier élément du tableau, c'est-à-dire l'élément numéro zéro. Par exemple :

E> N=5 : P=0
   Dim A(N)
   Print "Tapez ";N," nombres, ou entrez 0"
   Print "pour arrêter la saisie et commencer le tri"
   Repeat
    Input A(P)
    If A(P)=0
       Dec P
       Exit
    End If
    If P=N-1 Then Exit
    Inc P
   Until False
   Sort A(0)
   For X=N-P To N
    Print A(X)
  Next X

MATCH
fonction : rechercher une valeur dans un tableau
x=Match(tableau(0),valeur)
x=Match(tableau#(0),valeur#)
x=Match(tableau$(0),valeur$)

MATCH effectue une recherche dans un tableau ayant déjà été trié avec SORT, en cherchant une valeur donnée. Si la valeur est trouvée, x contient alors l'indice correspondant. Cependant, si la recherche échoue, le résultat sera une valeur négative. Si vous prenez la valeur absolue de ce résultat, vous obtenez l'élément le plus proche du paramètre de recherche initial. Seuls les tableaux à une dimension peuvent être examinés de cette manière, et ils doivent avoir été triés avant l'appel à MATCH.

Par exemple :

E> Read N : Dim D$(N)
   For X=0 To N-1 : Read D$(X) : Next X
    Sort D$(0)
    Do
     REINPUT:
     Input A$
     If A$=" "Then End
     If A$="print all data"
        For X=1 To N: Print D$(X) : Next X: Goto REINPUT
     End If