Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.03.17;
Скачать: CL | DM;

Вниз

Генератор случайных чисел   Найти похожие ветки 

 
sniper ©   (2003-03-05 16:08) [0]

Ув. знатоки, подскажите как в Делфи создать генератор случайных чисел?


 
Smithson ©   (2003-03-05 16:16) [1]

Randomize
Random


 
Dms   (2003-03-05 16:21) [2]

сейчас скажет, что это "недостаточно случайны" генератор :)


 
Иксик   (2003-03-05 16:21) [3]

Random(N), где N - верхняя граница, рандомизация начинается с нуля. Т.е. если тебе нужно получать случайные числа от 1 до 100,
то:

randomize;
x := 1 + random(99);


 
Иксик   (2003-03-05 16:22) [4]


> Dms

Вообще-то так оно и есть :)


 
DVM ©   (2003-03-05 16:25) [5]

Можно сделать более случайным, если приплести к нему время, дату, скорость вращения кулера, напряжение питания, т.е. все что меняется непредсказуемо


 
Dms   (2003-03-05 16:27) [6]

Ну как ты скорость вращения кулера вытащищь ?
TCooler.Speed
а напряжение ?
TUPS.Voltage
:)


 
DVM ©   (2003-03-05 16:31) [7]

Так как это делают все мониторы - из биоса.


 
Sheriff   (2003-03-05 16:31) [8]

2Иксик
>randomize;
>x := 1 + random(99);
имеем числа в диапазоне 1..99


 
DVM ©   (2003-03-05 16:34) [9]


> Dms

Пожалста:
http://www.delphikingdom.com/mastering/wmi.htm#054


 
Anatoly Podgoretsky ©   (2003-03-05 16:35) [10]

В Дельфи уже есть генератор, но если он не устравивает то тебе сюда UBPFD


 
Mystic ©   (2003-03-05 16:38) [11]

Из help:

RandG function
Generates random numbers with Gaussian distribution.

Random function
Generates random numbers within a specified range.

RandomFrom function
Returns a randomly selected element from an array.

Randomize procedure
Initializes the random number generator with a random value.

RandomRange function
Returns a random integer from a specified range.

RandSeed variable
RandSeed stores the built-in random number generator"s seed.

Ежели сфера твоих интересов лежит в области создания собственных ГСч и тестирования их характеристик, то смотри
http://www-cs-faculty.stanford.edu/~knuth/programs/rng.c
http://www-cs-faculty.stanford.edu/~knuth/programs/rng-double.c


 
Dms   (2003-03-05 16:44) [12]

2 DVM
Хорошо. Но не на всех же компах стоят навороченные "мамки"

Вообще человек наверно пишет детскую программку про "угадывание выпавшего на кости числа", а ему про создание собственных ГСч втирают.



Страницы: 1 вся ветка

Текущий архив: 2003.03.17;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.014 c
14-54291
blackman
2003-02-28 18:43
2003.03.17
Весна ! Но законы физики в средней полосе действуют слабо!


6-54152
WingGod
2003-01-24 02:45
2003.03.17
События...


7-54324
badaxe
2003-01-21 09:30
2003.03.17
Как определить время бездействия клавиатуры и мыши?


1-54095
Sever
2003-03-05 16:41
2003.03.17
TStringList и динамический массив


14-54258
Merlin
2003-02-27 05:44
2003.03.17
---|Ветка была без названия|---