| Нет. |
|
Возвращает текущее значение "основы" рандомизатора (генератора случайных чисел).
Эта команда позволяет вам 'поймать' состояние генератора случайных чисел, обычно, чтобы позже его восстановить. |
|
;'рандомизируем' генератор случайных чисел! SeedRnd MilliSecs() For k=1 To 12345 Rnd(1) Next ;захватываем состояние генератора случайных чисел state=RndSeed() ;генерируем группу чисел: Print "Первый набор:" For k=1 To 5 Print Rnd(1) Next ;восстанавливаем состояние генератора случайных чисел SeedRnd state ;генерируем еще одну группу чисел: Print "Второй набор чисел (такой же, как и первый...):" For k=1 To 5 Print Rnd(1) Next |