home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Joy Games
/
ShareGames.iso
/
doswin_2
/
1stcont
/
rand.rpp
< prev
next >
Wrap
Text File
|
1996-10-19
|
104b
|
10 lines
{Random Numbers}
randomize;
var n: number;
loop(n=1 to 20)
println(rand(1, 1000));
endl;