Функція Random в Delphi генерує випадкове число з плаваючою комою або ціле число.
System unit
- function Random : Extended;
- function Random (LimitPlusOne : Integer) : Integer;
Функція Randomгенерує довільні числа. Це можуть бути числа з плаваючою комою числами в діапазоні:
0 <= Number <1.0
або цілі числа в діапазоні:
0 <= Number
Delphi використовує генератор псевдовипадкових чисел, який, щоразу, при виконанні програми повертає ту саму послідовність значень(232).
Щоб уникнути цієї передбачуваності, використовуйте процедуру Randomize. Вона як початкове псевдовипадкове значення встановлює поточний час.
Функція Random: Генерація набору цілих чисел і чисел із плаваючою комою
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
Подібні функції, процедури та команди
Randomize — встановлює генератор випадкового числа на наступне значення.
RandomRange — генерує довільне число в межах введеного діапазону.
RandSeed — встановлює генератор випадкового числа на наступне значення.
