Un programme très simple dans le basic du tableur OpenOffice

Pour plus d'explication voir le QCM Niveau 1

le nombre p doit appartenir à [0,1]
n est un entier
rnd est un nombre aléatoire identique à alea(). Sa valeur appartient à [0,1]

Télécharger la feuille OpenOffice contenant les algorithmes