| Bernouilli |
| Auteur |
Message |
maxou87
Invité
|
Posté le : Sam 23 Mai 2009, 13:55
|
|
|
Bonjour j'ai crée un programme qui permet de résoudre la loi de Bernouilli
!:c'est l'intégral
ù:c'est la flèche qui permet de stocker
^:c'est la puissance
| Code | EffEcr
Input "P: [0,1] = ",P
Input "N = ",N
Input "X inférieur ou égal N = ",K
K!(N-K)!ù B
N!/Bù C
P^Nù D
(1-P)^(N-K)ù E
C*D*Eù F
EffEcr
Disp "LE RESULTAT EST:",F |
|
| |
|
| |
Sangohan38
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
|
Posté le : Sam 23 Mai 2009, 15:23
|
|
|
Tu devrait utiliser les balises pour rendre ton message plus lisible...
Sinon, ton programme est raccourcissable:
| Code | ClrHome
Input "P:[0,1])",P
Input "N=",N
Input "X [inférieur où égal à] N=,K
Disp "LE RESULTAT EST:",N!/B*P^N*(1-P)^(N-K)
Pause
ClrHome
Output(1,1," " |
|
 |
|
| |
 |
|
|
| |
Page générée en 6 requêtes |
|
|