CHAINES PALINDROMES
Fermé
hiba125
Messages postés
5
Date d'inscription
vendredi 31 mars 2017
Statut
Membre
Dernière intervention
8 avril 2017
-
7 avril 2017 à 17:04
tarek_dotzero Messages postés 817 Date d'inscription jeudi 19 juillet 2007 Statut Membre Dernière intervention 12 avril 2022 - 4 mai 2017 à 02:04
tarek_dotzero Messages postés 817 Date d'inscription jeudi 19 juillet 2007 Statut Membre Dernière intervention 12 avril 2022 - 4 mai 2017 à 02:04
A voir également:
- Palindrome pascal
- Turbo pascal download - Télécharger - Édition & Programmation
- My pascal - Télécharger - Édition & Programmation
- Dev-pascal - Télécharger - Édition & Programmation
- Pascal le grand frere streaming ✓ - Forum Cinéma / Télé
- Turbo pascal linux ✓ - Forum Linux / Unix
3 réponses
ThEBiShOp
Messages postés
8378
Date d'inscription
jeudi 22 mars 2007
Statut
Contributeur
Dernière intervention
8 février 2021
1 565
7 avril 2017 à 17:18
7 avril 2017 à 17:18
Salut
j'imagine qu'il te faudrait un dictionnaire (ou au moins une liste de mots) permettant de déterminer si une chaine est correcte ou non.
Tu devras aussi faire une fonction qui déterminera si ta chaine est équivalente à la même chaine à l'envers.
j'imagine qu'il te faudrait un dictionnaire (ou au moins une liste de mots) permettant de déterminer si une chaine est correcte ou non.
Tu devras aussi faire une fonction qui déterminera si ta chaine est équivalente à la même chaine à l'envers.
----->REMER<-----
Partir du début et de la fin jusqu'au milieu de la chaine en comparant les caractères , si c'est vrai on incrémente le début d'un cran et on décrémente la fin d'un cran, si c'est pas vrai pour un seul caractère on quitte la boucle.
Partir du début et de la fin jusqu'au milieu de la chaine en comparant les caractères , si c'est vrai on incrémente le début d'un cran et on décrémente la fin d'un cran, si c'est pas vrai pour un seul caractère on quitte la boucle.
tarek_dotzero
Messages postés
817
Date d'inscription
jeudi 19 juillet 2007
Statut
Membre
Dernière intervention
12 avril 2022
120
4 mai 2017 à 02:04
4 mai 2017 à 02:04
Bonjour,
Plus conretement :
Commencer à gauche ==> Un premier indice,
Commencer à droite ==> Un dexuième indice,
Vous vérifiez à chaque fois l'égalité des deux caractères.
Je commence :
Plus conretement :
Commencer à gauche ==> Un premier indice,
Commencer à droite ==> Un dexuième indice,
Vous vérifiez à chaque fois l'égalité des deux caractères.
Je commence :
program Palindrome;
uses crt;
var
i, j : Integer;
p : String;
ToutPasseBien : Boolean;
BEGIN
ReadLn(p);
i := 1;
j := Length(p);
ToutPasseBien := True;
While (ToutPasseBien and (i <= Length(p))) Do
Begin
{Quoi mettre dans la boucle ??}
End;
{Quiu faire après??}
END.
