Форум программистов, компьютерный форум, киберфорум
Наши страницы

Delphi для начинающих

Войти
Регистрация
Восстановить пароль
 
 
Рейтинг: Рейтинг темы: голосов - 18, средняя оценка - 4.61
Cannon1
2 / 2 / 0
Регистрация: 29.09.2012
Сообщений: 386
#1

Хитрый диапазон случайных чисел - Delphi

17.07.2013, 17:17. Просмотров 2511. Ответов 46
Метки нет (Все метки)

Здравствуйте.

Нужно в функции (Random(1000)+350); сделать так, чтобы найденные числа больше не использовались в диапазоне функции рандома. Не могу сообразить, набросайте пример пожалуйста, если такое возможно.
То есть диапазон постепенно сокращается.
Потом после нахождения числа надо опять восстановить первоначальный диапазон, и тд.


Delphi
1
2
3
4
5
6
7
8
9
10
11
procedure TForm1.tmr1Timer(Sender: TObject);
begin
Randomize;
Label1.Caption:=IntToStr(Random(1000)+350);
 if Label1.Caption = '490' then begin
 Label3.Visible:=True;
 Tmr1.Enabled:=False;
 
// Тут восстановить диапазон случайных чисел
end;
end;
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.07.2013, 17:17
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Хитрый диапазон случайных чисел (Delphi):

Среди N случайных чисел в диапазоне от -1 до 10 определите количество чисел, делящихся на 3. - Delphi
6. Среди N случайных чисел в диапазоне от -1 до 10 определите количество чисел, делящихся на 3.

Не могу разобраться в коде. Диапазон чисел - Delphi
Такой код, не могу понять, почему не пропускает) я новичок если что, так что не засирайте, а помогите!) Спасибо зарание) begin if...

Количество чисел, которые генерируются и диапазон для генерации вводить через форму - Delphi
Определить, какой процент повторов случайных чисел (общие_количество повторов / общие количество_чисел * 100) будет встречаться при...

Генерация случайных чисел - Delphi
Парни, подскажите как сделать генератор случайных чисел. Мы вводим диапазон чисел например 0-3, макс количество таких елементов, и оно...

Матрица случайных чисел - Delphi
Необходимо заполнить stringgrid случайными числами так чтобы сумма всех значений равнялась 1. матрица 3х3. for i:=0 to 2 do begin...

Генератор случайных чисел - Delphi
Датчик псевдослучайных чисел Random с формировать выборку объёмом 1000 с равномерным законом распределения !!!!! помогите как это...

46
Cyborg Drone
31.07.2013, 09:15     Хитрый диапазон случайных чисел
  #46

Не по теме:

crn, то, что Вы предлагаете, предлагалось ещё в посте #14 этой темы... Рекомендую Вам сначала прочитать всю тему, а затем что-либо писать вообще... Успехов.

0
VTsaregorodtsev
414 / 400 / 61
Регистрация: 19.02.2010
Сообщений: 1,632
03.08.2013, 18:23 #47
Не по теме.

mss, не выдавайте Ваши слова за мои Или уже свои собственные слова не можете различить/вспомнить?
То, что процитировано Вами в 44посте темы как якобы мои слова - являются Вашими собственными словами из поста 23.

Таки повторяю. Для обучения нейросетки (или даже кучи сеток одного или разного размера) на некоторой задаче - достаточно однократно рандомно перемешать обучающие примеры (если они исходно упорядочены как-то тенденциозно), и затем рандомизацию не повторять независимо от числа обучающих эпох. Если сеток и/или эпох много - бывает выгоднее перезаписать обучающий файл в новом порядке, чтобы потом читать из него последовательно (а не скакать вперёд-назад по рандомным примерам).
Если в каких-то книжках написано не так - мне плевать. Ибо мой опыт подтверждает действенность именно моей рекомендации.
Тем более, щас появилась куча возможностей по рандомизации в других местах и/или иными способами. Например, предложенный в прошлом году Хинтоном метод dropout позволит работать даже с исходно нерандомизированными примерами (заместо рандомизации порядка следования примеров он использует рандомное - на каждом примере - исключение отдельных входов и/или нейронов из сети).
0
03.08.2013, 18:23
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
03.08.2013, 18:23
Привет! Вот еще темы с ответами:

Генератор случайных чисел - Delphi
В голове проскользнула мысль, что наш (вузовский) тест пишется на Delphi, где есть 4 варианта ответа который 1 правильный, значит там...

Генератор случайных чисел - Delphi
Здравствуйте,я только только начал изучать делфи и сейчас делаю программу с генератором.Суть программы в том что задается случайное число...

Массив случайных чисел - Delphi
Очень нужно, помогите пожалуйста! Задан массив из случайных целых чисел. Если произведение элементов массива, кратных 7, больше...

Генератор случайных чисел - Delphi
Все работает, только не так как надо) В коде указано промежуток чисел от "А" до "В" , в котором будет выбираться рандомное число....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
47
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru