ещё раз про Random (вдогонку к закрытой теме 'НЕ ПОЙМУ КАК ВЫВИСТИ ЧИСЛО')

[Serge_Bliznykov]

Уважаемые господа программисты.

19.04.2008 на форуме была тема про получение случайного числа. Тема эта уже закрыта.

Поэтому решил создать новую тему, т.к. в старой никто не обратил внимание на грубейшее попрание всех и вся основ работы со случайными числами в Pascal (в Дельфи обсуждаемый код вообще не откомпилируется...)!

дело в том, что:
RandSeed - это "встроенная" в Pascal/Delphi переменная. Она содержит опорное число генератора случайных чисел.
Занеся в неё определённое число ВСЕГДА получится ОДНА И ТА ЖЕ последовательность случайных чисел
(By assigning a specific value to RandSeed, the
Random function can be made to repeatedlly
generate a specific sequence of random
numbers.)

для того, чтобы это предотвратить - перед вызовом Random обязательно нужно вызвать Randomize! (Initializes the built-in random number
generator with a random value (obtained from
the system clock).)

поэтому, в свете вышеизложенного, строчка
RandSeed := Random( 999) - полная ахинея и бред...

[Air]

На сколько я помню random(x) вернёт от 0 до 1, при любом "х", но если перед ним (random) поставить команду "Randomize" то функция random(10) - вернёт от 0 до 9 (кажется, может и до 10). Как в Paskal, так и в delphi.