HP 39gII Guia Del Usuario página 268

FLOOR(SIDES) SIDES;
IF SIDES<2 THEN
MSGBOX("Debe ser >= 2");
END;
UNTIL SIDES>=2;
END;
// especificar el número de veces que se
lanza el dado.
VIEWS "Establecer lanzamientos",SETROLLS()
BEGIN
REPEAT
INPUT(ROLLS,"Número de lanzamientos",
"N = ","Introducir
número de lanzamientos",10);
FLOOR(ROLLS) ROLLS;
IF ROLLS<1 THEN
MSGBOX("Debe introducir un número >= 1");
END;
UNTIL ROLLS>=1;
END;
Plot()
BEGIN
-1 Xmin;
MAX(D1)+1 Xmax;
0 Ymin;
MAX(D2)+1 Ymax;
STARTVIEW(1,1);
END;
Programación 257