Cette procédure trie un tableau par la méthode de tri à bulle en comparant et échangeant des éléments adjacents jusqu'à ce que le tableau soit trié.
Procédure Tri_A_Bulle (@T : Tab ; n : entier) Début Répéter Permut ← 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 Permut ← Vrai Fin si Fin Pour Jusqu'à (permut = Faux) Fin