Mode:
Duration:
1
2
3
4
5
6
7
8
9
MODULE DiceRoll;
IMPORT IO, SYSTEM;
VAR i, roll: INTEGER;
BEGIN
FOR i := 1 TO 3 DO
roll := SYSTEM.Random() MOD 6 + 1;
IO.Put("Roll "); IO.PutInt(i,0); IO.Put(" : "); IO.PutInt(roll,0); IO.PutLn();
END;
END DiceRoll.Coding works best on desktop or with an external keyboard.