Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 28.11.2008, 10:45   #1
Teen4jump
Пользователь
 
Аватар для Teen4jump
 
Регистрация: 19.06.2007
Сообщений: 88
По умолчанию Случайные числа....

Как получить действительно случайное число? Если делаю так:
a:=random(100) ;
то все время получаю такую последовательность:
0, 3, 86, 20, 27, 67, 31, 16, 37, 42... и т.д.
А нужны сучайные числа((((...
Teen4jump вне форума Ответить с цитированием
Старый 28.11.2008, 10:53   #2
DeKot
Участник клуба
 
Аватар для DeKot
 
Регистрация: 12.08.2008
Сообщений: 1,977
По умолчанию

Задав вопрос, посмотри всегда в самом низу странички форума.Там всегда ссылки на аналогичные вопросы.Включи Поиск перед вопросом.
Только вчера был точно такой же вопрос.
См. http://www.programmersforum.ru/showthread.php?t=31002
И не сомневайся даже ... отдых - кайф, работа - лажа!
DeKot вне форума Ответить с цитированием
Старый 28.11.2008, 22:56   #3
Сергей089
Форумчанин
 
Регистрация: 22.09.2008
Сообщений: 214
По умолчанию

randomize;
a:=100*random; {действительные числа от 0 до 100}
a:=random(100); {целые числа от 0 до 100}
Сергей089 вне форума Ответить с цитированием
Старый 28.11.2008, 23:30   #4
hkdkest
Заблокирован
 
Регистрация: 28.11.2008
Сообщений: 6
По умолчанию

Цитата:
Сообщение от Teen4jump Посмотреть сообщение
Как получить действительно случайное число? Если делаю так:
a:=random(100) ;
то все время получаю такую последовательность:
0, 3, 86, 20, 27, 67, 31, 16, 37, 42... и т.д.
А нужны сучайные числа((((...
Можно получить в зависимости от времени например... зато всегда будет новая комбинация ))).... почти вегда..
hkdkest вне форума Ответить с цитированием
Старый 28.11.2008, 23:52   #5
Somebody
Участник клуба
 
Регистрация: 08.10.2007
Сообщений: 1,185
По умолчанию

Цитата:
Сообщение от Сергей089 Посмотреть сообщение
randomize;
a:=100*random; {действительные числа от 0 до 100}
a:=random(100); {целые числа от 0 до 100}
От 0 до 99
Somebody вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Псевдо случайные числа (Рандомизация) Demien Общие вопросы Delphi 7 16.07.2009 03:58
Случайные велечины Sam04 Помощь студентам 4 16.06.2008 01:31
ДАНЫ 4 ЧИСЛА X Y Z W составит программу найти произведение все положительные нечетные числа Woland-itn Паскаль, Turbo Pascal, PascalABC.NET 3 23.03.2008 21:49
Delphi - Случайные числа Albenous Помощь студентам 2 28.12.2007 22:34
Числа Палиндромы в С++ grerg Помощь студентам 0 27.11.2007 11:42