Forum strony www.multipasko.pl [Regulamin]


Dodaj wpis w tym temacie
Spis tematów
Login:

Hasło:
Strona: 1
Wyślij wiadomość do admina

Przewiń wpisy ↓

WSZYSTKIE KOMBINACJE

2009-04-06 (10:54)

status cygus75
Data rejestracji: 2009-04-06
Ilość postów: 1869

4421
wpis nr 192 453
[ CZCIONKA SPECJALNA ]

fajnie by bylo aby ktos umial zrobic i by to zrobil programik ktory by nam wszystkie kombinacje rozpisal a nastepnie zeby wpisac wszystkie juz losowania i je wyrzucil i zostaly by tylko te ktorych jeszcze nie wylosowano
2009-04-06 (16:07)

status piszę, bo wiem
Data rejestracji:
Ilość postów:

wpis nr 192 493
[ CZCIONKA SPECJALNA ]

Takie programy już od dawna są używane przez multimaniaków.
2009-04-06 (16:19)

status rico
Data rejestracji: 2008-12-11
Ilość postów: 509

3966
wpis nr 192 497
[ CZCIONKA SPECJALNA ]

cygus,ale z ciebie śmigus !!!!!

Przecież zawsze mogą się powtórzyć te kombinacje, które już były.

Jest wiele przykładów na potwierdzenie moich słów
2009-04-06 (16:28)

status login_2009
Data rejestracji: 2008-10-09
Ilość postów: 464

3787
wpis nr 192 498
[ CZCIONKA SPECJALNA ]

Hejk\'a!

cygus75 wrote:

<< [...] programik ktory by nam wszystkie kombinacje rozpisal a następnie zeby wpisac wszystkie juz losowania i je wyrzucil i zostaly by tylko te ktorych jeszcze nie wylosowano >>



proszę bardzo, na życzenie (rozumiem, że chodzi Tobie o excela, poniżej podaję kod/makro w VBA; przyjąłem też, że chodzi o Dużego Lotka):



Sub wszystkie_kombinacje ()

Dim i As Byte, j As Byte, k As Byte, l As Byte, m As Byte, n As Byte

Dim c As Integer, r As Long

r = 1

c = 1

Application.ScreenUpdating = False

For i = 1 To 49

For j = i + 1 To 49

For k = j + 1 To 49

For l = k + 1 To 49

For m = l + 1 To 49

For n = m + 1 To 49

Cells(r, c) = i & \" \" & j & \" \" & k & \" \" & l & \" \" & m & \" \" & n

r = r + 1

If r > 65536 Then

Application.ScreenUpdating = True

c = c + 1

r = 1

ThisWorkbook.Save

If c > 256 Then

c = 1

Worksheets.Add

End If

Application.ScreenUpdating = False

End If

Next

Next

Next

Next

Next

Next

End Sub



ostrzegam tylko, że będzie bardzo dłuuuuuuuuuuuuuuuugo się wpisywało, jeżeli masz słaby komputer...



drugą część zadania możemy dokończyć, ale musisz mi podesłąć całą bazę dużego, a najlepiej to podeślij wszystkie bazy gier, bo na stronie totalizatora to tragedia jest..., a jak będą problemy to nic nie podsyłaj, a podam ci drugą część
2009-04-06 (18:08)

status AA
Data rejestracji: 2008-04-13
Ilość postów: 107

3377
wpis nr 192 501
[ CZCIONKA SPECJALNA ]

Moim zdaniem początek powinien być taki



For i = 1 To 49 - 5

For j = i + 1 To 49 - 4

For k = j + 1 To 49 - 3

For l = k + 1 To 49 - 2

For m = l + 1 To 49 - 1

For n = m + 1 To 49



chyba że ja źle myślę.
2009-04-06 (19:16)

status slawek001
Data rejestracji: 2005-02-24
Ilość postów: 6116

721
wpis nr 192 522
[ CZCIONKA SPECJALNA ]

To ja mam trochę inny pomysł jak napisać makro żeby z wylosowanych 20 liczb ułożyło wszystkie możliwe 10/10 tak w przedziale 50 dni sprawdziło które 10/10 w tym przedziale miało duże wyjścia i wybierało 10/10 o małych wyjściach z branego do analizy przedziału losowań .... zawsze mamy przedział 50 ostatnich losowań kiedy wpisujemy nowe losowanie ostatnie jest kasowane

i kto mój pomysł potrafi liczydłom przetłumaczyć



wesołego dnia
2009-04-07 (18:35)

status login_2009
Data rejestracji: 2008-10-09
Ilość postów: 464

3787
wpis nr 192 679
[ CZCIONKA SPECJALNA ]

slawek001:

<<To ja mam trochę inny pomysł [raczej problem; login_2009]

jak napisać makro żeby z wylosowanych 20 liczb [chodzi o ostatnie losowanie ML?; login_2009]

ułożyło wszystkie możliwe 10/10;

tak w przedziale 50 dni sprawdziło które 10/10 w tym przedziale miało duże wyjścia i wybierało 10/10 o małych wyjściach z branego do analizy przedziału losowań .... [chodzi o ilość powtórzeń/wystąpień?; login_2009]

zawsze mamy przedział 50 ostatnich losowań kiedy wpisujemy nowe losowanie ostatnie jest kasowane>>



2009-04-08 (15:59)

status login_2009
Data rejestracji: 2008-10-09
Ilość postów: 464

3787
wpis nr 192 811
[ CZCIONKA SPECJALNA ]

Hejk\'a

Nie mój interes, ale jaki jest sens generować 10/10 z 20 liczb, co daje nam w sumie 184756 kombinacji, całkiem pokaźna liczba, i następnie jeśli dobrze to wszystko zrozumiałem (jeśli nie to mnie popraw) sprawdzać wśród ostatnich 50 losowań ML (czemu aż 50 losowań???), które 10/10 miało dużą frekwencję, a które małą (i wybierać te z tą małą). A zauważ, że będzie trzeba powtarzać tą operację dla każdej ze 184756 kombinacji względem ostatnich 50 losowań. Jak dla mnie trochę poroniony pomysł, ale nie musicie się z tym wcale zgadzać.

Oby nie była to tylko sztuka dla sztuki...
| Dodaj wpis w tym temacie | Spis tematów | Wyniki lottoStrona: 1
Wyślij wiadomość do admina