1,000 Games/Disc1.iso/ARCADE/REXDEMO/RAND.RPP

Text File | 1996-10-19 | 104b | 10 lines

{Random Numbers}

randomize;

var n: number;

loop(n=1 to 20)
  println(rand(1, 1000));
endl;