Code :
- ALGO J421
- VAR
- GLOBALES d[1..3]: tableau d'entiers
- GLOBALES r[1..3] : tableau d'entiers
- GLOBALES c, j:entier
- i : entier
- drap : booleen
-
- Fonction verif : booleen
- VAR i : entier
- drapv : booleen
- DEBUT
- Pour i:=1 à 3
- SI d[i]=4 ou d[i]=2 ou d[i]=1
- ALORS
- SI d[i]=4 et r[1]<>1
- ALORS
- r[1]:=1
- c:=c+1
- afficher "le Dès 4 a été retenu"
- FSI
- SI d[i]=2 et r[2]<>1
- ALORS
- r[2]:=1
- c:=c+1
- afficher "le Dès 2 a été retenu"
- FSI
- SI d[i]=1 et r[3]<>1
- ALORS
- r[3]:=1
- c:=c+1
- afficher "le Dès 1 a été retenu"
- FSI
- FSI
- FPOUR
- Si c>=3
- alors
- drapv:=.vrai.
- SINON
- drapv:=.faux.
- FSI
-
- Valret := drapv
- FIN
- DEBUT
- c:=0
- j:=0
- pour i:=1 à 3
- r[i]:=0
- Fpour
- drap:=.faux.
- Répéter
- pour j:=1 à 3
- Afficher j, " er lancé :"," Jeter 3 dès"
- pour i:=1 à 3
- afficher "resultat du dès n°",i
- saisir d[i]
- Fpour
- drap:= Verif()
- FPOUR
- jusqu'a drap=.vrai. ou j=3
- SI drap=.vrai.
- ALORS
- AFFICHER "Gagné"
- SINON
- AFFICHER "Perdu"
- FSI
- FIN
|
Voila mon petit probleme avec cet algo c'est que si au premier essai je fai 421 direct, et bien il va quand meme me demander de faire les autres jet de dès. Hors j'ai bien mis dans le REPETER > jusqu'a drap=.vrai. ou j=3 c'est à dire que la combinaison est bonne ou que le nb de jet est égal à 3.
Merci d'avance, vu la difficulté des autres posts..je pense que le mien devrait etre vite réglé lol (j'ai l'impression d'être un bébé qui joue au cube chez les constructeurs d'immeuble lol)