Forum

Catégorie : Programmes
Forum : Aide à la programmation
Vues : 684
Réponses : 5
Type : discussion
Etat : réponses autorisées

Aide Programme Probabilités

Matheux-Lol le 14/04/2012 à 18:40
Bonjour !
Je dois faire un programme et je n'y arrive pas.
On doit numéroter 10 personnes de 1 à 10. Ensuite on fait une simulation qui donne une liste de 10 chiffres (soit 0, soit 1). Si c'est 0, la personne à gagner sinon si c'est 1 elle a perdu. On doit aussi afficher le nombre de personnes gagnante.

La probabilité de gagner est de 9/20.

Merci de votre aide.
linkakro le 14/04/2012 à 19:28
Tu ppurais nous montrer ce que tu as déjà tenté, ainsi nous pourrions trouver ce qui ne marche pas dans ton code.

Probabilité indépendante de valeur 9/20, à reproduire pour 10 personnes.
Une boucle pour effectuer 10 fois le test de probabilité, et une liste pour recueillir les résultats. Puis la somme des résultats.

algorithme :
Code
0->A
ClrList L1
10->dim(L1  // facultatif dans ce programmme particulier
For(B,1,10
If rand<9/20
1->L1(B
End
Disp L1,sum(L1
fonction particulière de la TI :
Code
randBin(1,9/20,10
Disp Ans,sum(Ans
Matheux-Lol le 14/04/2012 à 21:25
Merci cela marche winkle.gif !
Mais n'y aurait-il pas un moyen que le programme envoie sur les listes dont L1 aurait des numéros de 1 à 10, et L2 des 0 et des 1.
Enfin, L3 contiendrait le nombre de 1.

J'en demande peut-être trop pour une TI ?
sandro le 14/04/2012 à 22:22
Code
seq(A,A,1,10 -> L1
10->dim(L2
For(B,1,10
rand<9/20->L1(B
End
{sum(L2 -> L3
Disp L1,L2,L3

C'est ça que tu veux?

PS : le test rand<9/20 renvoie 0 si faux et 1 si vrai
linkakro le 15/04/2012 à 00:22
(L1 a un faîble intérêt et L3 n'en a aucun.)

Tu m'as bien eu avec le booléen à stocker dans L1(B).
Tant qu'on y est, on peut utiliser l'astuce de rand(N) (que tu as montré dans le sujet du morpion de persalteas)
Code
seq(A,A,1,10 -> L1
rand(10)<9/20->L2
Disp L1,L2,sum(L2
tapenad le 15/04/2012 à 00:29
petit HS: linka quefait tu a cette heure sur le fofo?