HP Prime Manuel De L'utilisateur page 621

Programme
ROLLDIE
Programme
ROLLMANY
Programmation
Nous allons tout d'abord créer un programme appelé
ROLLDIE (lancement de dé). Ce programme simule le
lancer d'un seul dé, en renvoyant un entier aléatoire
compris entre 1 et le nombre indiqué à la fonction.
Dans le catalogue de programmes, créez un nouveau
programme nommé ROLLDIE. (Pour plus d'instructions,
voir page 603.) Entrez ensuite le code suivant dans
l'éditeur de programmes.
EXPORT ROLLDIE(N)
BEGIN
RETURN 1+FLOOR(RANDOM(N));
END;
La première ligne est l'en-tête de la fonction. Lorsque
l'instruction RETURN est exécutée, un entier aléatoire
compris entre 1 et N est calculé et renvoyé comme
résultat de la fonction. Notez que la commande RETURN
provoque l'arrêt de la fonction. Ainsi, toutes les
instructions comprises entre RETURN et END sont ignorées.
Dans la vue d'accueil (ou dans n'importe quel
environnement de la calculatrice dans lequel il est
possible d'utiliser un nombre), entrez ROLLDIE(6) pour
qu'un entier aléatoire compris entre 1 et 6 soit renvoyé.
Un autre programme pourrait utiliser la fonction ROLLDIE
et générer un nombre n de lancers (rolls) d'un dé (die)
contenant un nombre de faces (sides) donné. Dans le
programme suivant, la fonction ROLLDIE est utilisée pour
générer n lancers de deux dés, dont le nombre de faces
est spécifié par la variable locale sides (faces). Les
résultats sont mémorisés dans la liste L2, de sorte que
L2(1) renvoie le nombre de fois où le total combiné des
deux dés a été 1, que L2(2) renvoie le nombre de fois où
leur total a été 2, et ainsi de suite. Le résultat de L2(1) ne
peut évidemment être autre que 0, sachant que la somme
de deux dés ne peut pas être inférieure à 2.
EXPORT ROLLMANY(n,sides)
BEGIN
LOCAL k,roll;
// Initialiser la liste de fréquences
MAKELIST(0,X,1,2*sides,1) L2;

619