Je ne sais pas quel compilateur Pascal tu utilise, mais en Turbo Pascal ou en Delphi, il faut mettre Randomize en tout début de programme afin d´initialiser le générateur de nombre aléatoire et ensuite, quel que soit l´endroit de ton programme tu utilise la fonction Random(n). Si je ne me trompe pas, celà renverra un nombre de 0 à n-1.
Exemple :
Program Hasard;
Var
N : Byte;
Begin
Randomize;
For N:=1 To 10 Do
WriteLn(Random(N));
End.