En vous préparant un petit jeu,
j'ai remarqué un truc bizarre
qui est peut-être un bug de panoramic.
Je vous l'ai simplifié dans ce programme :
- Code:
-
rem ' Vérif-rnd
dim a , i , a$ : rem Variables quelconques
dim m : rem Maximum du test
dim zz(7) : rem Nombre de fois où le chiffre de 1 à 7 est sorti
m=21000
for i=1 to m
a=int(rnd(7))+1 : ' Tirage au sort d'un nombre de 1 à 7
zz(a)=zz(a)+1 : ' Inscription de ce nombre dans l'une des 7 listes
caption 0,str$(i)+"/"+str$(m) : ' Affichage de la progression
next i
for i=1 to 7
a$=a$+str$(int((zz(i)/m)*100))+"% ---" : ' Inscription des résultats en %
next i
caption 0,a$
beep
Ne trouvez-vous pas bizarre que le 1 sorte
systématiquement plus souvent que le 7 ?
(et les autres chiffres de façon proportionnelle)
Essayez plusieurs fois, vous verrez !
Ce n'est pas conforme aux lois de Laplace-Gauss !
Allez, programmeurs professionnels
et mathématiciens chevronnés,
à vos tablette !
Que dites-vous de cette énigme
tout à fait digne du Da vinci code ?
Accueil 
Calendrier
