Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как сгенерить случайное число целого типа... [D7, XP]


Страницы:   1 2

deras ©   (2007-07-12 14:54:00) 

..и записать его в пременную


engine   (2007-07-12 18:15:00) [1]

> [21] Rip_1982 ©   (12.07.07 18:12)

и сразу стереть :)


Zagaevskiy   (2007-07-12 18:15:00) [2]


> Rip_1982 ©   (12.07.07 18:12) [21]

Какой ключ? Для регистрации проги на этом компе?
Ну я не мастер, но это не рэндомом делается, да ещё без randomize


Rip_1982   (2007-07-12 18:12:00) [3]


> 1 раз при каждом запуске? и оно всегда одинаковое? а смысл?

Ну что ты пристал? Может ему надо ключь сгенерировать.


Zagaevskiy   (2007-07-12 18:10:00) [4]

1 раз при каждом запуске? и оно всегда одинаковое? а смысл?


Kolan   (2007-07-12 18:10:00) [5]

> Для разовой генерации такого «случайного числа»

Программы они все одноразовые, как салфетки, запустил 1(один) раз — и стер, да?


Rip_1982   (2007-07-12 18:09:00) [6]


> ну-ну
> Позвольте, а что значит для разовой? Это из разряда "удалить
> самого себя"?

Нет, это из разряда получения случайного числа (1 раз) и использования его в дальнейшей работе.


iXT   (2007-07-12 18:06:00) [7]


> Rip_1982 ©   (12.07.07 17:56) [14]
>
>

ну-ну
Позвольте, а что значит для разовой? Это из разряда "удалить самого себя"?


Zagaevskiy   (2007-07-12 18:02:00) [8]


> Rip_1982 ©   (12.07.07 17:56) [14]

Для разовой генерации такого "случайного числа" можно так сделать :
i:=3141592;
Чем не случайное число?


Jeer   (2007-07-12 17:59:00) [9]


> deras ©   (12.07.07 14:54)


Не слушай этих приколистов.
Вот тебе реальный LCG Super-Duper:

X(i+1) = ( a * X(i) + c ) mod m
m = 4294967296
a = 69069
c = 0
X(0) = 1

Дает только целые, не оторвешься от него.


Rip_1982   (2007-07-12 17:56:00) [10]


> А как же :) Отсутствие результата - тоже результат (с) Заяц,
>  который любил всем давать советы.

Очень смешно. Я имел ввиду, что если он нужен для разовой генерации случайного числа то использование randomize не обязательно.


iXT   (2007-07-12 17:44:00) [11]


> Johnmen ©   (12.07.07 17:41) [12]

А как же :) Отсутствие результата - тоже результат (с) Заяц, который любил всем давать советы.


Johnmen   (2007-07-12 17:41:00) [12]

Прикольное понимание "работы".
Т.е. просидеть весь день на рабочем месте, плюя в потолок, оказывается тоже работа!


Rip_1982   (2007-07-12 17:08:00) [13]

Зато работает! :)


engine   (2007-07-12 17:05:00) [14]

> [9] Rip_1982 ©   (12.07.07 17:01)

Только выдает одну и ту же цепочку значений каждый раз :)


Rip_1982   (2007-07-12 17:01:00) [15]


> To initialize the random number generator, add a single
> call Randomize or assign a value to the RandSeed variable
> before making any calls to Random.

Он и без этого работает!


engine   (2007-07-12 16:24:00) [16]

> [7] clickmaker ©   (12.07.07 16:23)

Ну так можно же RandSeed пользовать


clickmaker   (2007-07-12 16:23:00) [17]


> [6] Rip_1982 ©   (12.07.07 16:17)

разве?
а как же
To initialize the random number generator, add a single call Randomize or assign a value to the RandSeed variable before making any calls to Random.
(c) F1


Rip_1982   (2007-07-12 16:17:00) [18]


> не забыть сначала randomize

И это тоже не обязательно! :)


engine   (2007-07-12 16:09:00) [19]

> [4] AZIZE ©   (12.07.07 16:06)

Вообще-то round не надо :)


AZIZE   (2007-07-12 16:06:00) [20]

вообщето если целлого то
i := Round(random(2147483647))


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо