Bonjour
DEBUT DU PROGRAMME
Déclaration:
participants tableau de type chaine contenant les noms + prénoms
nomPrenom de type chaine
nomPrenomMem de type chaine
nbrParticipant de type numérique
flagStop de type booléenne
Initialisation :
Affecte vide à nomPrenomMem
Affecte 0 à nbrParticipant
Affecte 0 à flagStop
Tant que pas atteint la fin des participants et flagStop = 0
Faire
lecture du nomPrenom des participants
Si nomPrenomMem = nomPrenom alors
Afficher "... ERREUR : Deux noms consécutifs : ", nomPrenom
Affecte 1 à flagStop
sinon
Affecte nomPrenom à nomPrenomMem
Incrémente le nbrParticipant de 1
fin si
Fin Tant que
si flagStop = 0 alors
Affiche "-----------------------------------------------------------------------"
Affiche "Nombre total de participants : ", nbrParticipant
sinon
Affiche Arrêt du programme de lecture
fin si
FIN DU PROGRAMME
Bonne lecture
