Supprimer tous les espaces d'une phrase
Fonction supprimer(ch : chaine) : chaine Début Tant que pos(" ",ch) ≠ -1 Faire p ← find(" ") ch ← effacer(ch, p, p+1) Fin Tant que Retourner ch Fin