Accueil > Algorithmes > Vérifier si une chaîne est un tautogramme (Méthode Mots)
Un tautogramme est une phrase dont tous les mots commencent par la même lettre.
Fonction tautogramme(ch : chaine) : Booléen DÉBUT ch ← Majus(ch) + " ", c ← ch[0], test ← Vrai Tant que test et ch ≠ "" Faire p ← Pos(" ", ch), mot ← Sous_chaine(ch, 0, p) test ← mot[0] = c ch ← Sous_chaine(ch, p+1, long(ch)) Fin Tant que Retourner test FIN