Функция RandomRange в Delphi генерирует случайное целое число в указанном диапазоне.
Math unit
function RandomRange (const RangeFrom, RangeTo : Integer) : Integer;
Функция RandomRange генерирует произвольное целое число (integer) в пределах диапазона RangeFrom и RangeTo.
Она обеспечивает более удобную версию функции Random модуля System.
Оба используют псевдослучайную последовательность чисел 232 значений. Каждый раз, когда Вы выполняете вашу программу, сгенерированные значения будут одни и те же, если Вы не установите генератор в произвольную часть последовательности, используя функции Randomize или RandSeed.
Функция RandomRange: Генерация случайных чисел в очень маленьком диапазоне
var
i : Integer;
begin
// Показ 5 случайных чисел в диапазоне от 652 до 656
for i := 1 to 5 do
ShowMessage('Случайное число : '+IntToStr(RandomRange(652, 656)));
end;Результат
Случайное число = 652
Случайное число = 652
Случайное число = 655
Случайное число = 652
Случайное число = 653
Похожие функции, процедуры и команды
Random — генерирует случайное целое число или число с плавающей запятой.
Randomize — устанавливает генератор случайного числа на следующее значение.
RandSeed — устанавливает генератор случайного числа на следующее значение.
Угостить автора чашечкой кофе