File: globalrandom.lpr

package info (click to toggle)
castle-game-engine 6.4%2Bdfsg1-2
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 194,520 kB
  • sloc: pascal: 364,585; ansic: 8,606; java: 2,851; objc: 2,601; cpp: 1,412; xml: 851; makefile: 725; sh: 563; php: 26
file content (11 lines) | stat: -rw-r--r-- 175 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
 
program GlobalRandom;

uses CastleRandom;

var i: Integer;
begin
  for i := 0 to 10 do
    WriteLn(Rand.Random:5:3);
  for i := 0 to 10 do
    WriteLn(Rand.Random(100));
end.