Sequence 8 - Le pendu - Correction Intermédiaire
Par Cabanel ADMIN, publié le lundi 28 mai 2012 08:31 - Mis à jour le lundi 28 mai 2012 08:33
pour vocabulaire
donne "x hasard 2
si :x=0 [donne "mot [B O N J O U R] ]
si :x=1 [donne "mot [A U R E V O I R] ]
fin
pour pendu
si :coups=1 [ ]
si :coups=2 [ ]
si :coups=3 [ ]
si :coups=4 [ ]
si :coups=5 [ ]
si :coups=6 [ ]
si :coups=7 [ ]
fin
pour jeu
#L'ordinateur choisit un mot au hasard, puis compte son nombre de lettre
vocabulaire
donne "longueur compte :mot
#On initialise la recherche
donne "recherche [ ]
repete :longueur [donne "recherche metsdernier "_ :recherche]
ecris :recherche
#On demande une lettre à l'utilisateur
lis [Entrez une lettre] "lettre
#On regarde si la lettre donnée par l'utilisateur convient.
donne "x 1
repete :longueur [
si :lettre = item :x :mot [ ecris [Bravo] ] [ ecris [PERDU] ]
donne "x :x+1
]
fin