Функция Random() без параметра возвращает псевдослучайное число из промежутка [0; 1). Обратите внимание, что 1 в этот промежуток не входит.
Чаще используется вызов этой функции с целочисленным параметром типа Word (0..65535). В таким случае функция Random(x) возвращает "случайное" число из интервала [0; x-1]. Пример:
Code
a := Random; {Заносит случайное число от 0 до 1, при этом не равное 1.}
b := Random(5); {Заносит случайное число от 0 до 4 включительно}
c := Random(21)-10; {Заносит случайное число от -10 до 10}
Нетрудно заметить, что при многократном выполнении этой программы числа будут одинаковые. Для того, чтобы инициализировать генератор случайных чисел каждый раз, перед использованием функции Random, выполняется процедура Randomize; (1 раз)
Пример:
Code
Randomize;
a := Random; {Заносит случайное число от 0 до 1, при этом не равное 1.}
b := Random(5); {Заносит случайное число от 0 до 4 включительно}
c := Random(21)-10; {Заносит случайное число от -10 до 10}
теперь при каждом выполнении программы числа будут различные.