Forum strony www.multipasko.pl [Regulamin]


Dodaj wpis w tym temacie
Spis tematów
Login:

Hasło:
Strona: 1 2 ... 129 130 131 ... 554 555
Wyślij wiadomość do admina

Przewiń wpisy ↓

moje ... oprogramowanie

2017-06-07 (12:13)

status kleszek
Data rejestracji: 2006-05-27
Ilość postów: 4979

2047
wpis nr 1 087 270
[ CZCIONKA MONOSPACE ]

kleszek napisał cyt. "Czy możesz podać makro, które prosto z excela będzie zapisywało strefy do pliku strefy.txt w takim formacie jaki używa jumper ?"

Problem już nieaktualny, poradziłem sobie. Przepraszam za zamieszanie.

Pozdrawiam!
2017-06-07 (19:57)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22655

1386
wpis nr 1 087 345
[ CZCIONKA MONOSPACE ]



function silnia(n:byte):longint;

begin

if n=0 then silnia:=1

else

silnia:=n*silnia(n-1);

end;







cover:=0;



For x := t To k do begin





a1:=silnia(x - 1);

a2:=silnia(t - 1);

a3:=silnia(x - t);

a4:=silnia(v - x);

a5:=silnia(v - x - (m - t));

a6:=silnia(m - t);



cover :=(a1/a2/a3)*(a4/a5/a6);

cover:=cover+cover;

end;



niestety mam od zawsze problemy z konwersją....



ktoś może podpowie konwersje do string (cover)

o ile tego nie zwaliłem



2017-06-07 (21:10)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 8669

14865
wpis nr 1 087 368
[ CZCIONKA MONOSPACE ]

777ch>>



cover :=(a1/a2/a3)*(a4/a5/a6);

cover:=cover+cover;



to chyba błąd, chyba powinno być:



cover1:=(a1/a2/a3)*(a4/a5/a6);

cover:=cover+cover1;



:)

2017-06-07 (22:47)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22655

1386
wpis nr 1 087 402
[ CZCIONKA MONOSPACE ]

fair_play> algorytm w VB działa poprawnie......

co do pascala to jutro się nad tym pochylę, dziś nie było ani czasu ani melodii.



pozdrawiam





2017-06-08 (10:30)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22655

1386
wpis nr 1 087 469
[ CZCIONKA MONOSPACE ]

fair_play



Działa ..chyba idealnie ale sprawdzę,nie było to specjalnie trudne,ale trzeba mieć

trzeźwy umysł



tak to w paskalu może być.....

var

coverblock:string;

cover,cover1 :extendet;

a1,a2,a3,a4,a5,a6: byte;

vmax,t,k,x,m :integer;

//-----------------------------------------



cover:=0;

cover1:=0;

For x := t To k do begin





a1:=silnia(x - 1);

a2:=silnia(t - 1);

a3:=silnia(x - t);

a4:=silnia(vmax - x);

a5:=silnia(vmax - x - (m - t));

a6:=silnia(m - t);



cover :=(a1/a2/a3)*(a4/a5/a6);

cover1:=cover+cover1;

end;



coverblock:= FloatToStr(cover1);//nasz string do pokazania





wcześniej wyłożyłem się ,

bo miałem w kodzie zmienną v,

a zmienna v to u mnie co innego...... zmienna dla v to ile zone ,

o czym zapomniałem, u mnie potrzebna zmienna,to globalna vmax





dzięki raz jeszcze za pomoc
2017-06-08 (11:10)

status kleszek
Data rejestracji: 2006-05-27
Ilość postów: 4979

2047
wpis nr 1 087 472
[ CZCIONKA MONOSPACE ]

777ch napisał cyt. "Znalazłem pierwszy błąd", "Jak by co to piszcie"



Ok, więc piszemy. Znalazłem nie tyle błąd, co raczej ograniczenie programu.



777ch > "Macie 200 stref po 49 liczb........ kombinujcie "



Sprawdziłem to, wpisując jako strefy losowania 5z42 z ograniczeniem max=2. Po wpisaniu stref do pamięci (generate to memory) program na buttonie pokazuje "Zbiór [5] z [42] = xxx kombinacji". Wszystko się zgadza, kiedy ilość stref nie będzie większa niż 50. Powyżej 50 stref ilość kombinacji nie zgadza się z tą, którą kontrolnie generuję w excelu makrem "ELIMIN5".

777ch > "ja miałem na celu wrzutę np 200 losowań czy 100 jako strefy,

i zrobienie sobie covera do gry..... np max=2 "

To świetny pomysł na wykorzystanie potencjału programu, tylko znowu dochodzimy do pytania, które już wcześniej padło " co tak naprawdę wtedy liczymy "? O ile w przypadku stref z kolejnymi liczbami od 1 do X nie ma większego problemu, bo po prostu tworzymy system gwarancyjny z warunkami początkowymi "v;k;t;m" z bazy gry wpisaną do "memory" programu, to w przypadku stref z liczbach powtarzającymi się w różnych strefach... nie wiem. Rozumiem, że program opierając się na bazie memory, wybiera zestawy, które dają gwarancję ... no właśnie, gwarancję czego ? Abo inaczej, klikając np. na button "jumper random", program liczy i pokazuje, że brak [xxx]. Tylko czym jest ten brak ?

777ch, nie zrozum mnie źle. Nie mam zamiaru Ciebie krytykować. Uważam, że już teraz program jest świetny, ale testując można znaleźć jakieś bugi w programie, albo wpaść na pomysł, dzięki któremu ten program będzie takim, z którego Tampakisy i inni twórcy tego typu programów będą mogli brać przykład Sam mam jakieś pomysły na usprawnienie programu, ale na tym etapie projektu nie mam sumienia Ciebie męczyć. Na razie jest dobrze tak jak jest.

Pozdrawiam!
2017-06-08 (11:17)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22655

1386
wpis nr 1 087 473
[ CZCIONKA MONOSPACE ]

kleszek> na razie Ty masz project roboczy, tam tablice dla zbioru są niskie,

powoli zmieniam ,zobaczymy ..... nie odpowiem na razie na pytania,bo piszę kod.
2017-06-08 (13:43)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22655

1386
wpis nr 1 087 503
[ CZCIONKA MONOSPACE ]

to w przypadku stref z liczbach powtarzającymi się w różnych strefach... nie wiem. Rozumiem, że program opierając się na bazie memory, wybiera zestawy, które dają gwarancję ... no właśnie, gwarancję czego ?



wtedy liczysz zbiór ,jakby minimalny zbiór ont,bo jeśli ograniczasz np do max=2 dla 200 losowań lotto ,to pozostanie zbiór jakby ont3 >=200 ...... ale z tego cover......może kumasz ?





ale rzeczywiście ,sporo poprawek ,nawet te 200 stref to u was nie dostosowany stringrid

czyli te kratki.....
2017-06-08 (14:52)

status kleszek
Data rejestracji: 2006-05-27
Ilość postów: 4979

2047
wpis nr 1 087 523
[ CZCIONKA MONOSPACE ]

777ch napisał cyt. "to pozostanie zbiór jakby ont3 >=200 ...... ale z tego cover......może kumasz ? "



No właśnie, nie kumam Bo przecież każdy z zestawów wpisanych do memory będzie miał ont3 > 200. Uruchomienie programu przy ustawionych parametrach "b,t,m" wybierze z bazy zestawy, które będą miały gwarancję np. 100% ( czego ? ) albo brak [xxx] właśnie nie wiem czego
2017-06-08 (17:44)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22655

1386
wpis nr 1 087 543
[ CZCIONKA MONOSPACE ]

kleszek>



program na poczatku buduje dwie grupy



pierwsza to cover=k czyli np k=10 buduje dziesiątki

druga to zbiór do sprawdzania=m czyli np m=8 buduje ósemki



niestety dla obu zbiorów trzeba ustawić pamięć,

zdecydowałem sie na przydział pamięci 15x więcej dla grupy pierwszej

edit> w wersji której jeszcze nie masz





teraz oba zbiory ,w procesie budowy ,mają odniesienie do n-liczb z każdej strefy



tym samym ,jeśli ustawisz max=2 dla strefy



to wybrane kombinacje 10-ek,będą tylko zaakceptowane jeśli zawierają maximum 2 liczby

z każdej strefy



to wybrane kombinacje 8-ek,będą tylko zaakceptowane jeśli zawierają maximum 2 liczby

z każdej strefy



tu mamy mały paradox........ bo np max dwa dla 8-ek to nie to samo co max2 dla 10-ek



następnie ,sprawdzamy pokrycie koveru,do którego trafiają kombinacje

w sposób losowy........ale tylko z grupy 1



a pokrycie sprawdzamy z grupy drugiej



może tu dojść do lekkiego.......paradoksu przy dużej ilości stref,

nie mniej jednak ,chodzi o budowę coveru ,pokrywającego zbiór=skresleń= [m]

a cover zawiera tylko kombinacje z grupy skresleń=k



nie ma zadnych innych kombinacji,random wybiera z tablic,w których cały czas te zbiory są,

do momentu zamknięcia programu.



Pokrycie to w tym przypadku.......przy dużej ilości stref....... liczba pokrytych kombinacji grupy drugiej.........



no ... czy to jasne?















--- wpis edytowano 2017-06-08 17:45 ---

2017-06-08 (19:57)

status Molek
Data rejestracji: 2005-12-12
Ilość postów: 4801

1497
wpis nr 1 087 563
[ CZCIONKA MONOSPACE ]

Leszek

a może zacząć od:

- wybrać zbiór z najdłuższym ONT na 3( np. 16 Liczb z LOTTO)

- podzielić powyższy zbiór na kilka, czy kilkanaście stref

- zbudować cover

To tyko takie przemyślenie

pozdrawiam

2017-06-08 (20:15)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22655

1386
wpis nr 1 087 569
[ CZCIONKA MONOSPACE ]

Molek

Można i tak

Program ma tylko budować cover..... do stref można wpisać z klawiatury cokolwiek .....i zapisać strefy,albo zrobić to za pomocą makra w excelu..... w formacie

spacja liczba spacja itd......

może to być 16 liczb ,podzielone na inne zbiory......również

do programu nie dołączę możliwości obliczeń czegokolwiek,

bo to maja inne programy...... tu liczą się tylko strefy.....



2017-06-09 (09:35)

status kleszek
Data rejestracji: 2006-05-27
Ilość postów: 4979

2047
wpis nr 1 087 670
[ CZCIONKA MONOSPACE ]

777ch >"no ... czy to jasne? "

Rozumiem, że w przypadku np. gwarancji [t]=2, przy braku[0] w zbiorze [b] zakładów będą znajdowały się wszystkie pary, które są wygenerowane w zestawie [generate to memory]. Mam nadzieję, że niczego nie pokręciłem
2017-06-09 (22:41)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22655

1386
wpis nr 1 087 834
[ CZCIONKA MONOSPACE ]

testujemy....

tast nr 1



dane wsadowe 81 losowań Multi Multi

10176 2017-04-30 1 4 5 7 9 10 14 17 25 27 28 31 45 47 49 52 53 63 64 78

10177 2017-04-30 4 6 10 14 16 18 19 23 33 36 40 57 60 61 62 65 71 72 77 79

10178 2017-05-01 6 14 22 26 30 33 37 41 43 47 48 62 63 65 66 67 74 76 77 78

10179 2017-05-01 5 9 11 15 18 25 27 31 34 38 40 42 47 49 50 51 56 57 62 74

10180 2017-05-02 3 8 14 19 21 27 28 32 33 40 42 46 47 50 56 57 60 69 70 75

10181 2017-05-02 7 10 11 12 19 27 28 33 40 49 52 56 58 60 63 65 67 72 78 80

10182 2017-05-03 1 5 6 10 13 16 22 30 39 48 51 54 60 62 65 68 71 73 77 78

10183 2017-05-03 3 7 9 11 17 18 22 25 27 33 48 49 51 54 59 68 71 73 74 76

10184 2017-05-04 4 5 13 14 17 19 25 26 29 40 41 44 54 69 70 71 73 75 76 77

10185 2017-05-04 5 6 8 10 19 25 27 31 36 37 48 53 57 58 61 62 66 68 76 80

10186 2017-05-05 9 17 22 25 27 33 36 39 43 47 50 53 56 59 60 61 67 75 77 78

10187 2017-05-05 4 12 16 17 19 20 27 31 34 37 38 45 48 55 56 59 61 64 77 80

10188 2017-05-06 8 14 16 17 24 25 33 34 43 44 47 48 49 57 64 68 72 75 77 78

10189 2017-05-06 1 3 6 13 14 18 24 33 36 40 41 44 45 48 50 54 60 73 77 78

10190 2017-05-07 3 4 17 19 23 27 30 31 32 37 38 40 41 57 60 62 63 72 74 79

10191 2017-05-07 2 3 9 14 16 17 18 19 20 21 27 36 42 44 48 53 54 67 76 79

10192 2017-05-08 4 6 14 16 18 20 23 25 26 33 34 40 42 47 51 61 63 66 74 77

10193 2017-05-08 2 4 5 10 14 22 23 26 32 43 45 52 53 59 60 63 65 66 67 75

10194 2017-05-09 11 12 17 20 22 26 29 33 34 37 41 44 46 49 52 63 68 70 74 75

10195 2017-05-09 1 2 6 7 8 11 18 27 30 36 39 44 45 50 54 55 57 64 71 77

10196 2017-05-10 1 2 3 4 14 15 18 20 23 25 26 27 31 60 64 66 69 73 78 79

10197 2017-05-10 3 11 12 25 26 35 36 44 47 48 50 54 56 59 60 64 65 75 77 79

10198 2017-05-11 1 2 4 11 12 17 22 23 26 27 32 34 36 40 43 46 56 62 74 78

10199 2017-05-11 6 14 16 17 22 25 34 40 42 43 55 60 61 63 65 67 69 72 79 80

10200 2017-05-12 2 10 13 15 18 21 24 26 32 42 47 53 54 59 66 67 70 73 74 80

10201 2017-05-12 1 4 9 12 13 16 19 20 21 27 33 34 36 41 43 48 49 56 59 70

10202 2017-05-13 4 11 12 15 16 18 28 31 34 35 43 51 52 60 67 68 69 73 75 77

10203 2017-05-13 4 8 11 26 28 29 39 40 41 44 54 58 61 62 63 69 70 71 74 79

10204 2017-05-14 5 9 13 15 19 20 24 27 32 35 37 38 47 51 55 68 69 72 73 78

10205 2017-05-14 10 14 16 17 22 23 27 28 38 40 41 48 55 57 65 67 71 76 78 80

10206 2017-05-15 1 13 15 23 29 31 33 35 41 42 47 49 51 52 60 65 69 72 76 77

10207 2017-05-15 4 17 19 24 25 31 38 40 41 47 50 51 57 58 59 60 64 66 68 70

10208 2017-05-16 1 2 4 11 13 16 17 21 36 40 44 47 53 56 58 59 64 67 72 80

10209 2017-05-16 1 5 6 17 28 29 30 36 37 40 56 60 62 63 67 69 72 73 76 78

10210 2017-05-17 19 21 25 26 27 33 36 39 40 44 46 48 49 50 55 57 62 67 75 80

10211 2017-05-17 1 2 7 14 17 21 24 30 33 38 45 46 47 51 52 53 54 67 69 70

10212 2017-05-18 4 6 10 11 16 24 26 34 35 37 40 45 47 54 57 63 72 74 77 78

10213 2017-05-18 1 8 13 17 18 23 29 32 36 38 39 44 48 49 54 57 60 61 69 78

10214 2017-05-19 6 8 12 14 17 24 25 28 30 32 36 38 39 43 47 49 57 58 66 77

10215 2017-05-19 4 6 10 12 19 20 22 35 43 45 57 58 62 66 69 71 72 76 78 79

10216 2017-05-20 2 12 17 18 21 25 31 32 36 42 44 48 51 55 56 58 62 67 68 72

10217 2017-05-20 1 10 12 19 20 24 26 31 34 35 37 38 42 43 46 51 58 65 69 75

10218 2017-05-21 5 7 11 15 16 17 18 20 27 41 42 44 47 53 55 57 65 70 71 80

10219 2017-05-21 2 3 6 9 13 21 30 35 36 42 44 46 53 58 63 64 70 74 78 79

10220 2017-05-22 2 4 8 15 16 23 26 33 38 41 42 44 47 59 60 68 71 76 78 79

10221 2017-05-22 2 6 7 8 16 23 24 27 28 35 40 45 49 56 58 62 68 74 79 80

10222 2017-05-23 1 2 4 8 18 19 22 27 32 35 37 44 49 56 57 58 63 67 70 71

10223 2017-05-23 12 27 29 32 33 35 41 48 50 51 52 55 56 57 58 61 65 71 78 80

10224 2017-05-24 1 2 7 14 19 25 28 32 36 48 55 61 63 68 69 72 73 74 77 79

10225 2017-05-24 6 10 11 17 23 31 34 40 43 46 50 54 56 57 58 62 64 77 78 79

10226 2017-05-25 7 15 19 21 27 32 33 35 37 40 42 45 49 52 57 66 68 69 70 74

10227 2017-05-25 7 17 20 28 32 33 35 36 42 43 45 47 50 56 65 67 69 73 76 78

10228 2017-05-26 1 9 13 15 16 25 27 40 46 47 50 51 57 59 60 66 67 73 75 77

10229 2017-05-26 5 15 20 27 40 42 44 47 49 55 56 58 63 64 66 67 69 73 76 79

10230 2017-05-27 4 8 14 16 27 29 30 32 33 44 48 53 56 57 64 65 66 67 71 75

10231 2017-05-27 1 10 15 16 18 21 29 30 36 38 39 42 44 49 52 54 57 61 67 79

10232 2017-05-28 13 18 19 20 25 26 29 33 34 42 47 48 51 60 63 65 77 78 79 80

10233 2017-05-28 1 5 9 14 17 18 20 29 33 38 40 43 44 48 60 62 68 73 74 75

10234 2017-05-29 1 9 12 15 26 28 37 42 44 49 50 55 59 61 63 65 69 76 78 80

10235 2017-05-29 11 16 18 19 34 35 38 40 42 43 48 51 60 63 65 66 68 74 76 79

10236 2017-05-30 2 6 7 13 16 18 23 24 30 31 40 46 50 51 66 70 74 76 79 80

10237 2017-05-30 1 3 6 9 13 14 18 20 26 28 29 34 35 40 46 59 66 67 72 73

10238 2017-05-31 7 19 21 24 27 28 35 36 38 42 45 51 54 59 64 65 66 70 73 76

10239 2017-05-31 3 4 6 9 12 14 19 31 32 34 35 36 47 49 55 62 66 70 71 72

10240 2017-06-01 7 8 17 28 31 39 40 45 46 51 53 56 61 63 66 68 70 71 74 79

10241 2017-06-01 3 14 16 21 24 30 42 47 52 55 56 58 59 61 62 63 65 68 77 79

10242 2017-06-02 2 4 8 14 17 25 26 27 34 39 40 44 51 53 55 56 62 64 67 77

10243 2017-06-02 3 7 8 13 20 28 29 30 31 36 37 47 54 56 57 58 60 65 66 74

10244 2017-06-03 5 8 11 15 18 20 34 37 43 44 47 49 50 51 54 63 67 68 71 74

10245 2017-06-03 1 6 7 10 17 32 35 37 41 46 48 49 58 61 67 68 74 75 76 77

10246 2017-06-04 4 12 17 21 22 23 24 30 35 38 41 54 56 60 61 67 71 73 75 76

10247 2017-06-04 3 12 15 17 29 33 37 38 43 45 47 48 53 55 69 70 73 75 76 79

10248 2017-06-05 3 11 14 15 16 19 21 22 23 25 37 41 47 49 58 59 62 63 64 79

10249 2017-06-05 4 12 13 16 17 24 25 36 38 42 48 53 54 63 64 68 70 76 78 79

10250 2017-06-06 2 4 5 6 9 21 25 34 38 40 46 54 61 62 63 67 68 76 77 78

10251 2017-06-06 1 14 18 20 24 25 26 29 31 40 42 45 57 61 66 68 69 77 78 80

10252 2017-06-07 7 11 12 16 17 18 30 37 43 46 50 51 55 58 59 63 65 68 71 79

10253 2017-06-07 2 11 15 19 25 31 32 37 43 47 52 54 55 60 65 66 71 72 74 75

10254 2017-06-08 1 12 16 17 21 23 25 32 36 40 47 49 52 54 59 63 68 70 72 77

10255 2017-06-08 1 4 12 22 29 36 38 40 48 50 52 54 56 59 66 70 71 73 74 80

10256 2017-06-09 1 4 7 11 17 18 22 32 33 37 40 55 56 60 66 69 72 75 79 80





czemu 81.....

tak mniej więcej .......wybrałem



wynik

Stref:= 81 po 20 Max = [4]

___Zone___

Zone |1| > 1-4-7-11-17-18-22-32-33-37-40-55-56-60-66-69-72-75-79-80

Zone |2| > 1-4-12-22-29-36-38-40-48-50-52-54-56-59-66-70-71-73-74-80

Zone |3| > 1-12-16-17-21-23-25-32-36-40-47-49-52-54-59-63-68-70-72-77

Zone |4| > 2-11-15-19-25-31-32-37-43-47-52-54-55-60-65-66-71-72-74-75

Zone |5| > 7-11-12-16-17-18-30-37-43-46-50-51-55-58-59-63-65-68-71-79

Zone |6| > 1-14-18-20-24-25-26-29-31-40-42-45-57-61-66-68-69-77-78-80

Zone |7| > 2-4-5-6-9-21-25-34-38-40-46-54-61-62-63-67-68-76-77-78

Zone |8| > 4-12-13-16-17-24-25-36-38-42-48-53-54-63-64-68-70-76-78-79

Zone |9| > 3-11-14-15-16-19-21-22-23-25-37-41-47-49-58-59-62-63-64-79

Zone |10| > 3-12-15-17-29-33-37-38-43-45-47-48-53-55-69-70-73-75-76-79

Zone |11| > 4-12-17-21-22-23-24-30-35-38-41-54-56-60-61-67-71-73-75-76

Zone |12| > 1-6-7-10-17-32-35-37-41-46-48-49-58-61-67-68-74-75-76-77

Zone |13| > 5-8-11-15-18-20-34-37-43-44-47-49-50-51-54-63-67-68-71-74

Zone |14| > 3-7-8-13-20-28-29-30-31-36-37-47-54-56-57-58-60-65-66-74

Zone |15| > 2-4-8-14-17-25-26-27-34-39-40-44-51-53-55-56-62-64-67-77

Zone |16| > 3-14-16-21-24-30-42-47-52-55-56-58-59-61-62-63-65-68-77-79

Zone |17| > 7-8-17-28-31-39-40-45-46-51-53-56-61-63-66-68-70-71-74-79

Zone |18| > 3-4-6-9-12-14-19-31-32-34-35-36-47-49-55-62-66-70-71-72

Zone |19| > 7-19-21-24-27-28-35-36-38-42-45-51-54-59-64-65-66-70-73-76

Zone |20| > 1-3-6-9-13-14-18-20-26-28-29-34-35-40-46-59-66-67-72-73

Zone |21| > 2-6-7-13-16-18-23-24-30-31-40-46-50-51-66-70-74-76-79-80

Zone |22| > 11-16-18-19-34-35-38-40-42-43-48-51-60-63-65-66-68-74-76-79

Zone |23| > 1-9-12-15-26-28-37-42-44-49-50-55-59-61-63-65-69-76-78-80

Zone |24| > 1-5-9-14-17-18-20-29-33-38-40-43-44-48-60-62-68-73-74-75

Zone |25| > 13-18-19-20-25-26-29-33-34-42-47-48-51-60-63-65-77-78-79-80

Zone |26| > 1-10-15-16-18-21-29-30-36-38-39-42-44-49-52-54-57-61-67-79

Zone |27| > 4-8-14-16-27-29-30-32-33-44-48-53-56-57-64-65-66-67-71-75

Zone |28| > 5-15-20-27-40-42-44-47-49-55-56-58-63-64-66-67-69-73-76-79

Zone |29| > 1-9-13-15-16-25-27-40-46-47-50-51-57-59-60-66-67-73-75-77

Zone |30| > 7-17-20-28-32-33-35-36-42-43-45-47-50-56-65-67-69-73-76-78

Zone |31| > 7-15-19-21-27-32-33-35-37-40-42-45-49-52-57-66-68-69-70-74

Zone |32| > 6-10-11-17-23-31-34-40-43-46-50-54-56-57-58-62-64-77-78-79

Zone |33| > 1-2-7-14-19-25-28-32-36-48-55-61-63-68-69-72-73-74-77-79

Zone |34| > 12-27-29-32-33-35-41-48-50-51-52-55-56-57-58-61-65-71-78-80

Zone |35| > 1-2-4-8-18-19-22-27-32-35-37-44-49-56-57-58-63-67-70-71

Zone |36| > 2-6-7-8-16-23-24-27-28-35-40-45-49-56-58-62-68-74-79-80

Zone |37| > 2-4-8-15-16-23-26-33-38-41-42-44-47-59-60-68-71-76-78-79

Zone |38| > 2-3-6-9-13-21-30-35-36-42-44-46-53-58-63-64-70-74-78-79

Zone |39| > 5-7-11-15-16-17-18-20-27-41-42-44-47-53-55-57-65-70-71-80

Zone |40| > 1-10-12-19-20-24-26-31-34-35-37-38-42-43-46-51-58-65-69-75

Zone |41| > 2-12-17-18-21-25-31-32-36-42-44-48-51-55-56-58-62-67-68-72

Zone |42| > 4-6-10-12-19-20-22-35-43-45-57-58-62-66-69-71-72-76-78-79

Zone |43| > 6-8-12-14-17-24-25-28-30-32-36-38-39-43-47-49-57-58-66-77

Zone |44| > 1-8-13-17-18-23-29-32-36-38-39-44-48-49-54-57-60-61-69-78

Zone |45| > 4-6-10-11-16-24-26-34-35-37-40-45-47-54-57-63-72-74-77-78

Zone |46| > 1-2-7-14-17-21-24-30-33-38-45-46-47-51-52-53-54-67-69-70

Zone |47| > 19-21-25-26-27-33-36-39-40-44-46-48-49-50-55-57-62-67-75-80

Zone |48| > 1-5-6-17-28-29-30-36-37-40-56-60-62-63-67-69-72-73-76-78

Zone |49| > 1-2-4-11-13-16-17-21-36-40-44-47-53-56-58-59-64-67-72-80

Zone |50| > 4-17-19-24-25-31-38-40-41-47-50-51-57-58-59-60-64-66-68-70

Zone |51| > 1-13-15-23-29-31-33-35-41-42-47-49-51-52-60-65-69-72-76-77

Zone |52| > 10-14-16-17-22-23-27-28-38-40-41-48-55-57-65-67-71-76-78-80

Zone |53| > 5-9-13-15-19-20-24-27-32-35-37-38-47-51-55-68-69-72-73-78

Zone |54| > 4-8-11-26-28-29-39-40-41-44-54-58-61-62-63-69-70-71-74-79

Zone |55| > 4-11-12-15-16-18-28-31-34-35-43-51-52-60-67-68-69-73-75-77

Zone |56| > 1-4-9-12-13-16-19-20-21-27-33-34-36-41-43-48-49-56-59-70

Zone |57| > 2-10-13-15-18-21-24-26-32-42-47-53-54-59-66-67-70-73-74-80

Zone |58| > 6-14-16-17-22-25-34-40-42-43-55-60-61-63-65-67-69-72-79-80

Zone |59| > 1-2-4-11-12-17-22-23-26-27-32-34-36-40-43-46-56-62-74-78

Zone |60| > 3-11-12-25-26-35-36-44-47-48-50-54-56-59-60-64-65-75-77-79

Zone |61| > 1-2-3-4-14-15-18-20-23-25-26-27-31-60-64-66-69-73-78-79

Zone |62| > 1-2-6-7-8-11-18-27-30-36-39-44-45-50-54-55-57-64-71-77

Zone |63| > 11-12-17-20-22-26-29-33-34-37-41-44-46-49-52-63-68-70-74-75

Zone |64| > 2-4-5-10-14-22-23-26-32-43-45-52-53-59-60-63-65-66-67-75

Zone |65| > 4-6-14-16-18-20-23-25-26-33-34-40-42-47-51-61-63-66-74-77

Zone |66| > 2-3-9-14-16-17-18-19-20-21-27-36-42-44-48-53-54-67-76-79

Zone |67| > 3-4-17-19-23-27-30-31-32-37-38-40-41-57-60-62-63-72-74-79

Zone |68| > 1-3-6-13-14-18-24-33-36-40-41-44-45-48-50-54-60-73-77-78

Zone |69| > 8-14-16-17-24-25-33-34-43-44-47-48-49-57-64-68-72-75-77-78

Zone |70| > 4-12-16-17-19-20-27-31-34-37-38-45-48-55-56-59-61-64-77-80

Zone |71| > 9-17-22-25-27-33-36-39-43-47-50-53-56-59-60-61-67-75-77-78

Zone |72| > 5-6-8-10-19-25-27-31-36-37-48-53-57-58-61-62-66-68-76-80

Zone |73| > 4-5-13-14-17-19-25-26-29-40-41-44-54-69-70-71-73-75-76-77

Zone |74| > 3-7-9-11-17-18-22-25-27-33-48-49-51-54-59-68-71-73-74-76

Zone |75| > 1-5-6-10-13-16-22-30-39-48-51-54-60-62-65-68-71-73-77-78

Zone |76| > 7-10-11-12-19-27-28-33-40-49-52-56-58-60-63-65-67-72-78-80

Zone |77| > 3-8-14-19-21-27-28-32-33-40-42-46-47-50-56-57-60-69-70-75

Zone |78| > 5-9-11-15-18-25-27-31-34-38-40-42-47-49-50-51-56-57-62-74

Zone |79| > 6-14-22-26-30-33-37-41-43-47-48-62-63-65-66-67-74-76-77-78

Zone |80| > 4-6-10-14-16-18-19-23-33-36-40-57-60-61-62-65-71-72-77-79

Zone |81| > 1-4-5-7-9-10-14-17-25-27-28-31-45-47-49-52-53-63-64-78



C(49,7,3,3) = 30



1 2 3 5 8 10 41

6 11 13 25 35 39 41

1 5 11 21 22 26 38

6 7 8 9 13 35 39

7 20 22 25 32 39 47

2 10 11 25 30 38 45

5 8 9 10 16 21 24

11 21 23 28 31 33 34

8 9 10 11 13 39 40

2 21 32 33 34 35 39

2 3 9 10 31 32 33

4 5 8 11 34 36 38

6 13 19 22 33 35 38

3 7 9 10 12 15 39

9 11 23 25 30 39 43

12 13 14 31 32 33 40

11 12 14 23 35 38 39

1 4 7 12 13 31 39

1 4 21 24 26 31 49

3 6 10 24 29 30 42

1 3 8 9 39 46 49

1 5 8 10 11 21 38

9 10 13 22 26 31 39

12 20 32 39 40 42 44

6 10 21 24 30 40 43

1 2 26 30 35 39 49

2 9 14 22 30 32 39

5 9 13 14 22 24 29

13 23 31 39 43 44 45

2 8 12 20 31 32 34



--Gwarancja Hit ROZPISU --

Gw. T=3 if M=3 = 98,9473684210526 %

Brak[1]





czyli sprawdzamy 30 zakładów ........od jutra przez 10 dni.... 20 losowań......co wejdzie

jak :

https://youtu.be/6bnau-IJ36I

2017-06-09 (23:20)

status kleszek
Data rejestracji: 2006-05-27
Ilość postów: 4979

2047
wpis nr 1 087 846
[ CZCIONKA MONOSPACE ]

777ch, fajny filmik pokazujący działanie programu w praktyce. Jak dla mnie ciekawostką jest fakt, że jako strefy można podać dla programu liczby [V] o wartości większe,j niż wpisane jest w okienko programu. Program po prostu pomija liczby nie mieszczące sie w zakresie. Testując Twój program spróbowałem zmierzyć się z rekordami strefowymi zawartymi na stronie http://www.quiniwin.com/quinielas/tablasquinigolpuras.html Wziąłem na tapetę system:

System strefowy liczb[20], stref[5]



Zone #1numbers: 1,2,3,4,... Min= 0 | Max= 1

Zone #2numbers: 5,6,7,8,... Min= 0 | Max= 1

Zone #3numbers: 9,10,11,12,... Min= 0 | Max= 1

Zone #4numbers: 13,14,15,16,... Min= 0 | Max= 1

Zone #5numbers: 17,18,19,20,... Min= 0 | Max= 1

z gwarancją 3 przy trafieniu 5. Aktualny rekord dla tego systemu wynosi 16 zakładów. Bez większych problemów udało mi się osiągnąć ten rekordowy wynik. Świadczy to o klasie programu. Z uwag dotyczących działania programu, jak wiesz osiągnięty cover z okienka programu nie zawsze pokrywał się z tym co pokazywał Verificatore. Rozwiązaniem tego problemu było kliknięcie buttona "best table". Po kliknięciu wyniki obu programów pokrywały się. To na razie tyle uwag z dzisiejszego testowania programu.

Pozdrawiam!
2017-06-09 (23:33)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22655

1386
wpis nr 1 087 847
[ CZCIONKA MONOSPACE ]

kleszek > to dopiero początki.... wiele już poprawiłem.....ale można jeszcze więcej

nie udało się na razie wdrożyć procedury 1-block, w vb działa bez problemu.....

w pascalu coś dwuznacznie działa, na dziś kończę ,

myślę że po kilku poprawkach będzie to fajna zabawka.....



co do braku zgodnosci ,to bład polegał na tym że za wczesnie nadpisywał dane z tablicy roboczej

do best ,zanim ta best tam trafiła..... jeszcze muszę zajrzeć do force random....

ale jamper i brute smal już prawidłowe daja rezultany..... dodałem uncovered....podgląd niepokrytych.

--- wpis edytowano 2017-06-09 23:37 ---

2017-06-10 (19:14)

status kleszek
Data rejestracji: 2006-05-27
Ilość postów: 4979

2047
wpis nr 1 087 986
[ CZCIONKA MONOSPACE ]

777ch, całkiem niezły strzał jak na pierwszy test programu. 1x 5z7; 3x 4z7; 7x 3z7, oby tak dalej

777ch, >> "myślę że po kilku poprawkach będzie to fajna zabawka..... "

To już jest fajna zabawka. Okienko uncovered... świetna sprawa.

Ja dzisiaj Twoim programem próbowałem wyrównać rekord systemu :



System strefowy liczb[25], stref[5],po [5]-liczby w strefie



1.2.3.4.5...... min=1| max=1| liczb

6.7.8.9.10...... min=1| max=1| liczb

11.12.13.14.15...... min=1| max=1| liczb

16.17.18.19.20...... min=1| max=1| liczb

21.22.23.24.25...... min=1| max=1| liczb

gwarancja 3z5, który wynosi 35 zakładów. Jak na razie mam brak pokrycia 26 zakładów. Być może do końca meczu Polska-Rumunia uda się zejść do 0





2017-06-10 (20:06)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22655

1386
wpis nr 1 087 997
[ CZCIONKA MONOSPACE ]

kleszek> na pewno dostaniesz produkt gotowy,chwilowo testuję rekord

378 <= C(36,6,3) <= 420 Created by Anastasios Tampakis



ustawiłem 378
2017-06-10 (20:20)

status kleszek
Data rejestracji: 2006-05-27
Ilość postów: 4979

2047
wpis nr 1 088 002
[ CZCIONKA MONOSPACE ]

378 to tzw. lower bound czyli granica teoretyczna wyliczona wzorem. Spróbuj jednak trochę zwiększyć ten próg. Lepiej bić rekordy metodą Siergieja Bubki, czyli centymetr po centymetrze
2017-06-10 (20:25)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22655

1386
wpis nr 1 088 005
[ CZCIONKA MONOSPACE ]

kleszek> zwiększę.....jak trochę się zbliży do zera



idę na mecz

narka

--- wpis edytowano 2017-06-10 20:27 ---

| Dodaj wpis w tym temacie | Spis tematów | Wyniki lottoStrona: 1 2 ... 129 130 131 ... 554 555
Wyślij wiadomość do admina