Saisir une phrase non vide formée de caractères alphabétiques et espaces
Procédure Saisir(@ph : chaine) Début Répéter Lire(ph) Jusqu'à (ph≠"") et Vérif(ph) et ... Fin