Code source tri par "selection"

tri_selection(tableau T)
   debut
       entier longueur, maxi, i
       longueur<-taille(T)

       tantque(longueur>0) faire
           //recherche de la position du plus grand élément dans le tableau non encore trié
           maxi<-0;

           pour i=1 à (longueur-1) faire
               si T(i)>T(maxi) alors
                   maxi<-i
               fin si
           fin pour

           //echange du plus grand élément avec le dernier
           echanger(T,maxi,longueur-1)

           //traitement du reste du tableau
           longueur<-longueur-1
       fin tantque
   fin