1- Fonction Presence(CH :chaine[200] ;C :caractère):booleen ;
Var T,I :entier ; Pr :booleen ;
Debut
Fin ;
T←Taille(CH) ; Pr←Faux ; I←1 ;
Tantque I≤T et Non Pr Faire Si CH[I]=C Alors Pr←Vrai Fsi ; I←I+1 ; Fait ; Presence ←Pr ;
2- Fonction NBVoyelle(CH :chaine[200] ):entier ;
Var T,I,Nbv :entier ;
Debut
T←Taille(CH) ; Nbv←0 ;
Pour I ←1 à T
Faire Cas CH[I] Vaut ‘a’,’e’,’i’,’o’,’u’,’y’ : Nbv←Nbv+1 ; Fincas ;
Fait ;
NBVoyelle ←Nbv ;
Fin ;
3- Fonction TouVoyelle(PH :chaine[200] ):booleen ;
Var T,I :entier ; CV :chaine[6] ;
Debut
T←Taille(PH) ; CV←‘aeiouy’ ;
Pour I ←1 à T
Faire Cas PH[I] Vaut
‘a’ :CV[1]←’X’ ;
’e’ : CV[2]←’X’ ;
’i’ : CV[3]←’X’ ;
’o’ : CV[4]←’X’ ;
’u’ : CV[5]←’X’ ;
’y’ : CV[6]←’X’ ;
Fincas ;
Fait ;
Si CV=’XXXXXX’ Alors TouVoyelle ←Vrai Sinon TouVoyelle ←Faux Fsi;
Fin ;
Ajouter un commentaire
Veuillez vous connecter pour ajouter un commentaire.
Pas encore de commentaires.