Inscription / Connexion Nouveau Sujet
Programme, piles consécutive max pour N=200 ?
Bonsoir,
Comme vous l'aviez sûrement comprit, j'ai besoin d'aide...
On me demande d'écrire un programme qui compte le plus grand nombre de piles consécutives dans une simulation de 200 lancers de pièces et c'est la calculatrice qui doit tout faire.
Alors, voilà ce que j'ai déjà fait sur la calculatrice (TI 82) :
200 sto N
0 sto P
0 sto E
For(I,1,N)
NrbAléat sto J
While J ≤ 0.5
P+1 sto P
End
If P > E
Then
P sto E
0 sto P
End
Disp E
Ouf, voilà donc je crois c'est faux...Parce-que même en diminuant N, la calculatrice rame...rame...
Alors, si vous pouviez m'aider 
Merci d'avance !
Guillaume
Bon, voici une solution que je te propose. Ce n'est pas très élégant, mais tant que ça marche 
Donc la voici, je te laisse essayer de comprendre comment ça fonctionne, et si tu n'y arrive pas je t'expliquerai :
200→N
0→A
0→C
0→M
For(I,1,N)
----NbrAléat→A
----If A
0.5
--------Then
------------If C
M
----------------Then
--------------------C→M
--------------------0→C
----------------Else
--------------------0→C
----------------End
--------Else
------------C+1→C
--------End
----End
Disp M
Donc là j'ai mis des tirets pour s'y retrouver dans ce bazar. Si tu veux la version "brute", tel que je l'ai tapé à la calculette, la voici :
Annuler
connectez vous