Langage Pascal probleme
Fermé
DimiMAzz
Messages postés
2
Date d'inscription
dimanche 21 octobre 2012
Statut
Membre
Dernière intervention
22 octobre 2012
-
22 oct. 2012 à 22:16
nicocorico Messages postés 799 Date d'inscription dimanche 19 juin 2011 Statut Membre Dernière intervention 3 juillet 2018 - 23 oct. 2012 à 19:29
nicocorico Messages postés 799 Date d'inscription dimanche 19 juin 2011 Statut Membre Dernière intervention 3 juillet 2018 - 23 oct. 2012 à 19:29
A voir également:
- Langage Pascal probleme
- Pascal langage - Télécharger - Édition & Programmation
- Langage ascii - Guide
- Turbo pascal download - Télécharger - Édition & Programmation
- Langage binaire - Guide
- Langage pascal - Télécharger - Édition & Programmation
1 réponse
nicocorico
Messages postés
799
Date d'inscription
dimanche 19 juin 2011
Statut
Membre
Dernière intervention
3 juillet 2018
138
Modifié par nicocorico le 23/10/2012 à 19:30
Modifié par nicocorico le 23/10/2012 à 19:30
Bonjour,
hé oui, là ta boucle va s'arrêter à chaque valeur pour dire si elles sont identiques ou non, alors qu'il faut tester les tableaux entiers avant de répondre...Pour ça le mieux est simplement d'ajouter une variable booléenne que tu influences dans ta boucle ainsi:
Le chêne aussi était un gland, avant d'être un chêne
hé oui, là ta boucle va s'arrêter à chaque valeur pour dire si elles sont identiques ou non, alors qu'il faut tester les tableaux entiers avant de répondre...Pour ça le mieux est simplement d'ajouter une variable booléenne que tu influences dans ta boucle ainsi:
Identiques:= True; For ((j=nbval2) downto (1)) and ((i=1) to(nbval1)) do If T1[i]<>T2[j] then Identiques:= False; If Identiques then writeln('C est un tableau miroir') else writeln('Ce n est pas un tableau miroir')
Le chêne aussi était un gland, avant d'être un chêne