Andreyn |
59,60
в 52 сообщении была половина истины
|
ponk |
61 чото ее (истины) с каждым разом все меньше =)))
|
МаркАврелий |
вам отсыпать малеха истины для продолжения?))
|
ponk |
63 =)))) дай две! =)
|
Ulitko |
55 вот я не втыкну, как статистика влияет на то, что выпадет?
просто можно включить мозг , до ее введения я был в минусе на 200к, с ее помощью сча +900к, просто на работе я самостоятельно не мог ее вести, а имея это, плюс то что зиро нет, это просто аппарат для зарабатывания денег и некоторые этим пользуюцца, а некоторые нет )))
|
ponk |
65 ого! ну просвети несведущих =)
чо там, наибольшая вероятность выпадения того, что давно не выпадало?
|
Ulitko |
66 а тебе зачем? тебя это я понял интересует чисто теоретически?
|
Spetros |
Предлагаю вашему вниманию простейший Генератор Псевдослучайных Чисел...
Развлекайтесь. =)
Необходимо создать текстовый файл с расширением VBS
Его текст:
Dim MyValue
dim soWshShell : set soWshShell = CreateObject("WScript.Shell")
dim tm
tm=timer()
'можно заменить строчку с таймером на время tm = #00:29:00#
Randomize(tm) ' Initialize random-number generator.
MyValue = CInt(Int((36 * Rnd()) + 1))
WScript.Echo tm & " " &MyValue
Есть и более сложная версия, но она не интересная :-Ъ
|
De3epT1p |
68 как ето работает?
|
Spetros |
69
А ты сделай как написано - увидишь.
Такой файлик можно блокнотом править, и проверять результаты ;-)
|
Ulitko |
68
это
это же
это какие то буквы и цифры
а числа на нашей рулетке выдает мегашаман моторварса.
|
De3epT1p |
там счас пишет 2254,968 33, и че типа ставить на "33"?
|
De3epT1p |
чета не вышло
|
Spetros |
В слове timeR букву R убери тогда вместо текущих секунд время выдаваться будет...
Без исправления когда генерируется просто случайное число... и выводится время его генерации. Если строчку заменить то будут выдаваться числа для заданного времени...
Это прога всего лишь игрушка :)
|
Spetros |
С секундами генерация время генерации точнее выдается
Если нужно вывести время без долей секунд текст будет таким...
Dim MyValue
dim soWshShell : set soWshShell = CreateObject("WScript.Shell")
dim tm
tm=time()
'можно заменить строчку с таймером на время tm = #00:29:00#
Randomize(tm) ' Initialize random-number generator.
MyValue = CInt(Int((36 * Rnd()) + 1))
WScript.Echo tm & " " &MyValue
|
Spetros |
+75
Всё, перегрелся... ушел спать... =)
|
Tit 0007 |
какое число сегодня будем мучать?есди только 26,оно 131 раз не выпадало...
|
Алексей1979 |
Так как выиграть в рулетку я так и не понял.
Дайте заработать:))))
|
Tit 0007 |
чаще всего число 26 выпадает после чисел 3-13-23
|
Tit 0007 |
+79 будем ждать...
|