Vérifier une chaîne alphabétique consonne
Fonction Vérif(ch : chaine) : booléen Début chv ← "OIYEAU" ch ← Majus(ch) i ← 0 Tant que (i<long(ch)) et (ch[i] ∈ ["A".."Z"]) et (pos(ch[i],chv) = -1) Faire i ← i+1 Fin Tant que Retourner i = long(ch) Fin