| Описание |
Функция Random генерирует случайные числа. Это могут быть числа с плавающей запятой числами в диапазоне:
0 <= Number <1.0
или целые числа в диапазоне:
0 <= Number
Delphi использует генератор псевдослучайных чисел, который, каждый раз, при выполнении программы возвращает одну и ту же последовательность значений (232).
Чтобы избегать этой предсказуемости, используйте процедуру Randomize. Она в качестве начального псевдослучайного значения устанавливает текущее время.
|
|
| Похожие команды |
Randomize Устанавливает генератор случайного числа на следующее значение
RandomRange Генерирует произвольное число в пределах введённого диапазона
RandSeed Устанавливает генератор случайного числа на следующее значение
| |
|
| Пример кода : Генерация набора челых чисел и чисел с плавающей запятой |
var
float : single;
int : Integer;
i : Integer;
begin
// Получение случайных чисел с плавающей запятой в диапазоне 0 <= number <1.0
for i := 1 to 5 do
begin
float := Random;
ShowMessage('float = '+FloatToStr(float));
end;
ShowMessage('');
// Получение целых случайных чисел в диапазоне 1..100
for i := 1 to 5 do
begin
int := 1 + Random(100); // Эти 100 значений дают диапазон 0..99
ShowMessage('int = '+IntToStr(int));
end;
end;
|
float = 2.3283064365387E-10
float = 0.031379981256104
float = 0.861048460006714
float = 0.202580958604813
float = 0.2729212641716
int = 68
int = 32
int = 17
int = 38
int = 43
|
|
