Supprimer le caractère c d'une chaine
Fonction supprimer(ch : chaine, c : caractère) : chaine Début Tant que pos(c,ch) ≠ -1 Faire p ← find(c) ch ← effacer(ch, p, p+1) Fin Tant que Retourner ch Fin