Исходник: Improved Random Number Generator

1xbet melbet

Двачевский

Стресс - мой прогресс
Авторитет
Сообщения
274
Реакции
223
Случайные числа, генерируемые в Delphi "родной" функцией Random далеки от идеала. По умолчанию при каждом запуске программы последовательность случайных чисел будет одинаковой. Улучшения достигаются добавлением системного таймера к процессу генерации случайных чисел – вызовом процедуры Randomize.
Тем не менее, это не приводит к улучшению того простого алгоритма, который используется в генераторе случайных чисел. Алгоритмы большей сложности дают лучшие результаты. Конечно, реальной необходимости в этом нет. Windows предоставляет генератор случайных чисел, вызываемый функцией CoCreateGUID. Данный пример показывает, как его можно использовать при минимуме кодинга для получения действительно качественного генератора случайных чисел.

 
kaspersky keys
Верх