Deviner le nombre entre 1 et 100 en moins de coup possible -------------------------------- PROGRAM:QUELCHIF Effacer entrées EffÉcran 0→N:0→R:0→C:0→I nbrAléatEnt(0,100)→N Output(1,2,"Trouvez le nombre secret") Output(3,6,"entre un et cent") Output(5,1,"en moins de coup possible") Output(7,6,"à vous de jouer !") Output(10,2,"[entrer] pour commencer") Pause EffÉcran While R≠N Input "Votre essai ",R C+1→C If I<9:Then:I+1→I:End If R=N:Goto F If R<N:Then Output(I,17,"trop petit") Else Output(I,17,"trop Grand") End End Lbl F Output(I+1,5,"Trouvé en") If C=1 Output(I+1,15,C):Output(I+1,18,"Coup") Output(I+1,15,C):Output(I+1,18,"Coups") Pause EffÉcran Effacer entrées