Debian
Debian-France
Debian-Facile
Debian-fr.org
Forum-Debian.fr
Debian ?
Communautés
Vous n'êtes pas identifié(e).
L'icône rouge permet de télécharger chaque page du wiki visitée au format
PDF et la grise au format ODT →
Ci-dessous, les différences entre deux révisions de la page.
| Les deux révisions précédentes Révision précédente | Prochaine révision Les deux révisions suivantes | ||
|
utilisateurs:hypathie:tutos:algo-exo-constructions-d-algorithmes-de-procedure [06/12/2014 10:52] Hypathie [Exo 3 : procédure rechercher un palindrome] |
utilisateurs:hypathie:tutos:algo-exo-constructions-d-algorithmes-de-procedure [06/12/2014 11:13] Hypathie [Exo 3 : procédure rechercher un palindrome] |
||
|---|---|---|---|
| Ligne 310: | Ligne 310: | ||
| CONSTANTES | CONSTANTES | ||
| constante MAX =80 //nombre max de caractères de la chaîne (Pour pouvoir créer le type chaine, car un tableau est toujours de taille fixe. | constante MAX =80 //nombre max de caractères de la chaîne (Pour pouvoir créer le type chaine, car un tableau est toujours de taille fixe. | ||
| - | constanteFIN ='.' // caractère terminaleur de la chaîne (Un tableau peut ne pas être tout rempli) | + | constante FIN ='.' // caractère terminaleur de la chaîne (Un tableau peut ne pas être tout rempli) |
| TYPES | TYPES | ||
| Ligne 316: | Ligne 316: | ||
| VARIABLES | VARIABLES | ||
| - | variable phrase : chaine // phrase où une symétrie est recherchée | + | variable possPalin : chaine // phrase où une symétrie est recherchée |
| - | variable i : entier // | + | variable indiceDeb : entier // |
| - | variable j : entier // indice de parcours de la phrase depuis la fin. | + | variable indiceFin : entier // indice de parcours de la phrase depuis la fin. |
| PROCEDURES | PROCEDURES | ||
| procédure cherchePalinPoint(entrée texte : chaine, | procédure cherchePalinPoint(entrée texte : chaine, | ||
| - | entrée sortie ind1 : entier, ind2 : entier) | + | entrée sortie ind1 : entier, ind2 : entier |
| + | sortie result : booléen) | ||
| // Cette procédure permet de dire si une chaine de caractère terminée par un point est un palindrome. | // Cette procédure permet de dire si une chaine de caractère terminée par un point est un palindrome. | ||
| // ind1 : c'est l'indice de parcours du texte par le début | // ind1 : c'est l'indice de parcours du texte par le début | ||
| Ligne 331: | Ligne 332: | ||
| ECRIRE ('Entrez votre phrase et n'oubliez pas de la terminer par un point.' | ECRIRE ('Entrez votre phrase et n'oubliez pas de la terminer par un point.' | ||
| LIRE(phrase) | LIRE(phrase) | ||
| - | i := palindrome[1] | + | indiceDeb := possPalin[1] |
| - | j := palindrome[MAX-1 | + | indiceFin := possPalin[MAX-1] |
| + | result := booléen | ||
| // Recherche d'un palindrome fini par un point : | // Recherche d'un palindrome fini par un point : | ||
| - | cherchePalinPoint(entrée phrase:chaine , entrée/sortie i:entier, entrée/sortie j:entier) | + | cherchePalinPoint(entrée possPalin:chaine , entrée/sortie ind1:entier, entrée/sortie ind2:entier, sortie result:bool) |
| - | SI i >= j ALORS | + | SI result = VRAI |
| - | ECRIRE('La phrase', phrase 'est un palindrome.') | + | ECRIRE('La phrase', possPalin 'est un palindrome.') |
| SINON | SINON | ||
| - | ECRIRE('La phrase', phrase 'n'est pas un palindrome.') | + | ECRIRE('La phrase', possPalin 'n'est pas un palindrome.') |
| FINSI | FINSI | ||
| Fin | Fin | ||
| Ligne 350: | Ligne 352: | ||
| <code> | <code> | ||
| procédure cherchePalinPoint(entrée texte : chaine, | procédure cherchePalinPoint(entrée texte : chaine, | ||
| - | entrée sortie ind1 : entier, ind2 : entier) | + | entrée sortie ind1 : entier, ind2 : entier |
| + | sortie result: booléen) | ||
| // Cette procédure permet de dire si une chaine de caractère terminée par un point est un palindrome. | // Cette procédure permet de dire si une chaine de caractère terminée par un point est un palindrome. | ||
| // ind1 : c'est l'indice de parcours du texte par le début | // ind1 : c'est l'indice de parcours du texte par le début | ||
| Ligne 364: | Ligne 367: | ||
| i : entier | i : entier | ||
| j : entier | j : entier | ||
| + | palindrome : booléen | ||
| TERM : '.' : caractère | TERM : '.' : caractère | ||
| Ligne 372: | Ligne 376: | ||
| j := chaine[TERM - 1] | j := chaine[TERM - 1] | ||
| - | SI chaine[i] < chaine[j] | + | |
| - | TQ (i < j et chaine[i] = chaine[j]) | + | SI chaine[i] < chaine[j] ALORS |
| + | palindrome := VRAI | ||
| + | TQ (i < j) ET chaine[i] = chaine[j]) | ||
| i := i + 1 | i := i + 1 | ||
| j := j - 1 | j := j - 1 | ||
| FinTQ | FinTQ | ||
| + | SINON | ||
| + | palindrome := FAUX | ||
| FINSI | FINSI | ||
