Чтобы получить "случайные" числа в Паскале, необходимо:
- сначала инициализировать датчик этих чисел вызовом стандартной процедуры randomize()
- а затем получать очередное случайное число вызовом стандартной функции random(x) - где $x$ - правая граница диапазона $[0..(x-1)]$.
Пример: