HP Prime Manuel De L'utilisateur page 632

Le programme
DiceSimulation
630
spécifier le nombre de lancers des dés ;
•
relancer l'application.
•
Dans cette optique, nous allons créer les vues suivantes :
START, SETSIDES et SETNUMROLLS.
L'option START (début) initialise l'application et affiche
une remarque contenant des instructions à l'attention de
l'utilisateur. L'utilisateur interagit également avec
l'application dans les vues numérique et graphique. Les
touches et
M P
configurations sont nécessaires pour que les fonctions
Num (nombre) et Plot (tracé) de notre programme les
lancent réellement.
Le programme permettant d'obtenir le nombre de faces
d'un dé (précédemment évoqué dans ce chapitre) va
maintenant être développé, afin que les sommes possibles
de deux dés soient mémorisées dans le jeu de
données D1. Entrez les sous-programmes suivants dans
le programme de l'application DiceSimulation
(simulation dés).
START()
BEGIN
DICESIMVARS();
{} D1;

{} D2;

SetSample(H1,D1);
SetFreq(H1,D2);
0 H1Type;

END;
VIEWS "Lancer dés",ROLLMANY()
BEGIN
LOCAL k,roll;
MAKELIST(X+1,X,1,2*SIDES-1,1)
MAKELIST(X+1,X,1,2*SIDES-1,1)
FOR k FROM 1 TO ROLLS DO
roll:=ROLLDIE(SIDES)+ROLLDIE (SIDES);
D2(roll-1)+1
END;
activent ces vues, mais quelques
D2(roll-1);

D1;

D2;

Programmation