| Вопрос: Randomize целые числа? | Добавлено: 12.02.06 13:47 |
Автор вопроса:  FIX | ICQ: 348680795 |
| Можно ли сделать генератор целых не псевдослучайных! чисел? Допустим от 1 до 10. |
| Ответы | Всего ответов: 7 |
|
Номер ответа: 1 Автор ответа:  Sergey ICQ: 283551900 Вопросов: 1 Ответов: 74 |
Профиль | | #1 | Добавлено: 12.02.06 14:28 |
|
Можно!!
Сделай бесконечный цикл в потоке, который будет увеличивать значение переменной и по нажатию на кнопку бери модуль на 10 от значение этой переменной! 
Или создавай прибор измерения каких-либо не контролированных величин! Программно создать нельзя!!! А зачем не псевдослучайных генератор? Создай псевдослучайных генератор с периодом ~2^256 32бит чисел и "сжимай" числа до log2(10)бит (10вариантов)! |
||
|
Номер ответа: 2 Автор ответа: AgentFire ICQ: 192496851 Вопросов: 75 Ответов: 3178 |
Профиль | | #2 | Добавлено: 12.02.06 15:33 |
|
Randomize Timer*Rnd
Msgbox CStr(Int(Rnd*9)+1) |
||
|
Номер ответа: 3 Автор ответа: ПавелАдминистратор ICQ: 326066673 Вопросов: 368 Ответов: 5968 |
Web-сайт: Профиль | | #3 | Добавлено: 12.02.06 16:52 |
|
Используйте функции CryptoAPI.
|
||
|
Номер ответа: 4 Автор ответа: FIXICQ: 348680795 Вопросов: 39 Ответов: 62 |
Профиль | | #4 | Добавлено: 12.02.06 21:50 |
|
Используйте функции CryptoAPI. Можно поподробней описание? откуда взять? в API-вьювере не нашел.
|
||
|
Номер ответа: 5 Автор ответа: FIXICQ: 348680795 Вопросов: 39 Ответов: 62 |
Профиль | | #5 | Добавлено: 12.02.06 21:56 |
|
Randomize Timer*Rnd
Msgbox CStr(Int(Rnd*9)+1) не-е, мне нужно (для примеру) из 300-т элементов рэндомом подставить и в тектбокс, но так чтоб подставленный элемент потом не добавлялся в текстбокс. |
||
|
Номер ответа: 6 Автор ответа: SergeyICQ: 283551900 Вопросов: 1 Ответов: 74 |
Профиль | | #6 | Добавлено: 12.02.06 23:23 |
|
Тоесть нужно все элементы “упорядочить” в случайном порядке?
Выбирай из N элементов любой потом выбирай из N-1 элементов потом N-2 и т.д. A() – массив элементов For i=N to 0 step -1 j = Int(Rnd*N) ‘ случайное число от 0 то N t = A(j) A(j)=A(i) A(i)=t ‘************* ‘ Случайный элемент в t Msgbox CStr(t) ‘************* Next i В конце в массиве А содержатся все элементы в обратном порядке появления. |
||
|
Номер ответа: 7 Автор ответа:  FIXICQ: 348680795 Вопросов: 39 Ответов: 62 |
Профиль | | #7 | Добавлено: 13.02.06 17:21 |
| Спасибо! Оказывается всё так просто! | ||
Страница: 1 |