{ Action de tri à bulle par ordre croissant   }
{ des valeurs contenues                       }
{ dans un tableau d'entiers                   }
{ t : Le tableau d'entiers à trier            }
{     par ordre croissant                     }

action triBulle(-> entier [] t ->)
  entier i
  entier j
  entier aux
  pour i de 0 à longueur(t)-2 faire
    pour j de 0 à longueur(t)-2-i faire
      si t[j] > t[j+1] alors
        aux <- t[j]
        t[j] <- t[j+1]
        t[j+1] <- aux
      fsi
    fait
  fait
fin action