Autorisation : Membre
Nb de messages : 1
Inscrit le : Dim 06 Sep 2015, 15:20
Posté le : Dim 06 Sep 2015, 15:45
Bonjours, je voudrais de l'aide pour programmer la fonction random car j'essaye depuis une trois heures et ne trouve plus mes erreurs...
Je devais traduire ceci sur ma calculatrice :
DEBUT_ALGORITHME
K PREND_LA_VALEUR 0
AFFICHER "Parametre n"
Lire n
Afficher "parametre p"
Lire p
AFFICHER "combien de tests ?"
Lire nb_test
POUR i ALLANT_DE 1 A nb_test
DEBUT_POUR
X PREND_LA_VALEUR 0
POUR cpt ALLANT_DE 1 A n
DEBUT_POUR
SI (random()<=p) ALORS
DEBUT_SI
X PREND_LA_VALEUR x+1
FIN_SI
FIN_POUR
SI(x==4)ALORS
DEBUT_SI
K PREND_LA_VALEUR K+1
FIN_SI
FIN_POUR
AFFICHER "frequence du 4"
AFFICHERCALCUL K/nb_tets
FIN_ALGORITHME
Voilà, désolé que ce soit aussi long ^^ je vous met maintenant ce que j'ai donc tapé à la calculatrice:
0->K
Disp "PARAMETRE N"
Prompt N
Disp "PARAMETRE P"
Prompt P
Disp "COMBIEN DE TEST ?"
Prompt nb_test
For(I,1,nb_test)
0->X
For(CPT,1,N)
If(NbrAléat()<=p)
X+1->X
If (X==4)
K+1->K
EndIf
EndFor
Disp "FREQUENCE DU 4"
Disp "CALCUL K/nb_test
End
Voilà bonne chance à celui ou celle qui aura la gentillesse de ce lancer dans ma correction ^^ à noté que je ne savait pas à quoi corespondait "CPT" je l'ai donc ecris en lettre sur la calculatrice :/
bye
