Randomize, Random
Randomize;
Dice :=
Random(6); Dice = 0 to 5
Dice := 1 + Random(6);
Dice = 1 to 6
Dice :=
Random(10); Dice = 0 to 9
Dice = 5 + Random(10);
Dice = 5 to 14
while Dice <
135 do
Dice := 1 + Random(289); Dice = 135 to 289
More Random
y := 1 + Random(15);
for x := 1 to y do
i := 1 +
Random(6);
z := 1 + Random(18);
for x := 1 to z do
j:= 1 + Random(6);
