Tri à bulles croissant avec indicateur de permutation.
Procédure tri_bulle (@T:tab; n:entier) Début Répéter ok ← Faux Pour i de 0 à n-2 faire si (T[i]>T[i+1]) alors aux ← T[i] T[i] ← T[i+1] T[i+1] ← aux ok ← Vrai Fin si Fin Pour Jusqu'à (ok = Faux) Fin