Главная страница
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
1-54085
star.ru
2003-03-05 14:23
2003.03.17
RichEdit


3-53890
DieM@N
2003-02-22 04:19
2003.03.17
Не открывается DBF-ник!!!


1-54062
XXX2
2003-03-04 18:55
2003.03.17
Как выбрать каталог без файла с помощью OpenDialog?


4-54361
elf_123
2003-01-15 21:03
2003.03.17
-= CBT Хук =-


14-54244
iNew
2003-02-28 10:39
2003.03.17
Вопрос по конструкции if (...) and (...) then