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 ↓

Potrzebny do DL programik żeby generował systemy pełne 6 z 49 liczb

2015-06-30 (10:25)

status Mariuszbemowo
Data rejestracji: 2007-12-25
Ilość postów: 3985

3083
wpis nr 914 159
[ CZCIONKA SPECJALNA ]

Potrzebny programik aby z 6 liczb z np 20 generował cały system pełny.

Ja potem go sobie skrócę. Ale nie LJCR ... Pzdr
2015-06-30 (10:55)

status sindbad
Data rejestracji: 2008-10-13
Ilość postów: 20462

3794
wpis nr 914 164
[ CZCIONKA SPECJALNA ]

LJCR, co to takiego
2015-06-30 (11:37)

status edi8
Data rejestracji: 2007-04-03
Ilość postów: 41774

2623
wpis nr 914 177
[ CZCIONKA SPECJALNA ]

LJCR= La Jolla Covering Repository



http://www.ccrwest.org/cover/table.html

..............



Mariuszbemowo, w bezpłatnym programie Admina: MultiPairs 2011/2014 masz opcje rozpisów systemów pełnych:



http://www.multipasko.pl/programy/multipairs/



Analiza 24



http://www.multipasko.pl/pomoc/pomoc24.html

--- wpis edytowano 2015-06-30 11:49 ---

2015-06-30 (11:42)

status pewniak112
Data rejestracji: 2014-02-11
Ilość postów: 5861

14047
wpis nr 914 178
[ CZCIONKA SPECJALNA ]

to jest tylko 38, 760 , zakładów ,
2015-06-30 (12:36)

status ralfek
Data rejestracji: 2009-07-08
Ilość postów: 3863

4876
wpis nr 914 184
[ CZCIONKA SPECJALNA ]

przygotuję takie coś, dajcie mi trochę czasu



btw mam nadzieję, że wiecie, że wypisywanie ZBYT wielu kombinacji zabije wam komputer?



pamięci nie wystarczy



dlatego lepiej nie bawić się w wypisywanie np 6 z 49
2015-06-30 (13:21)

status edi8
Data rejestracji: 2007-04-03
Ilość postów: 41774

2623
wpis nr 914 197
[ CZCIONKA SPECJALNA ]

2015-06-13 (17:05)



status sindbad

Data rejestracji: 2008-10-13

Ilość postów: 9099



3794

wpis nr 910 239



Permutacja Mini Lotto



http://sendfile.pl/pokaz/387995---bwhS.html

.................



Ten user ma też zapewne i permutację 6z49
2015-06-30 (13:32)

status ralfek
Data rejestracji: 2009-07-08
Ilość postów: 3863

4876
wpis nr 914 204
[ CZCIONKA SPECJALNA ]

Wszystkie piatki w mini generuje mi w pol minuty, jak na javascript niezle



jak wprowadze zabezpieczenia opublikuje
2015-06-30 (13:33)

status sindbad
Data rejestracji: 2008-10-13
Ilość postów: 20462

3794
wpis nr 914 205
[ CZCIONKA SPECJALNA ]

http://sendfile.pl/pokaz/410902---PXin.html

Notepad++ daje radę z 6/49

--- wpis edytowano 2015-06-30 13:35 ---

2015-06-30 (13:43)

status sindbad
Data rejestracji: 2008-10-13
Ilość postów: 20462

3794
wpis nr 914 207
[ CZCIONKA SPECJALNA ]

Program tylko liczy, więc należy być cierpliwym i poczekać maksymalnie kilkanaście sekund.



Procedura



procedure TForm1.Button1Click(Sender: TObject);

var

lista : TStringList;

i,j,k,l,m,n,x:integer;

begin

x:=UpDown1.Position;

lista := TStringList.Create;

for i:=1 to x-5 do

for j:=i+1 to x-4 do

for k:=j+1 to x-3 do

for l:=k+1 to x-2 do

for m:=l+1 to x-1 do

for n:=m+1 to x do

begin

lista.Add(format('%d %d %d %d %d %d',[i,j,k,l,m,n]));

end;

lista.SaveToFile(format('Permutacja 6 z %d.txt',[x]));

lista.Free;

ShowMessage('Permutacja zakończona');

end;





Znalazłem jeszcze taką funkcję, która zwraca ilość zakładów w permutacji.



function TForm1.IleTego(Kombinacje, Liczby: Integer): Double;

var

I:Integer;

SilniaKombinacji,SilniaLiczb:Double;

begin

Result:=0;SilniaKombinacji:=1;SilniaLiczb:=1;

If Kombinacje>Liczby Then Exit;

For I:=1 to Kombinacje do SilniaKombinacji:=SilniaKombinacji*I;

For I:=Liczby downto (Liczby-Kombinacje)+1 do SilniaLiczb:=SilniaLiczb*I;

Result:=SilniaLiczb/SilniaKombinacji;

end;

--- wpis edytowano 2015-06-30 13:50 ---

2015-06-30 (13:50)

status ralfek
Data rejestracji: 2009-07-08
Ilość postów: 3863

4876
wpis nr 914 208
[ CZCIONKA SPECJALNA ]

Gotowe:



http://www.wynikilotto.net.pl/systemypelne.htm



Wystarczy wpisać ile z ilu, sprawdzić czy nie będzie za dużo kombinacji i kliknąć Generuj
2015-06-30 (13:52)

status ralfek
Data rejestracji: 2009-07-08
Ilość postów: 3863

4876
wpis nr 914 209
[ CZCIONKA SPECJALNA ]

Przyda się też generator systemów strefowych?



kiedyś miałem coś takiego dla ediego zrobić ale wymiękłem bo tam miało być coś dodatkowo
2015-06-30 (16:43)

status edi8
Data rejestracji: 2007-04-03
Ilość postów: 41774

2623
wpis nr 914 241
[ CZCIONKA SPECJALNA ]

ralfek, bardzo proszę nawet w takiej wersji bez tamtych zgłoszonych Ci dodatków.

Czy dasz radę zrobić go np. do 5 stref po 5 liczb w każdej?

Pozdrawiam
2015-06-30 (17:10)

status ralfek
Data rejestracji: 2009-07-08
Ilość postów: 3863

4876
wpis nr 914 247
[ CZCIONKA SPECJALNA ]

spróbuję wieczorem (muszę pomyśleć nad rozwiązaniem), a resztę dodamy w późniejszym czasie
2015-06-30 (18:13)

status Mariuszbemowo
Data rejestracji: 2007-12-25
Ilość postów: 3985

3083
wpis nr 914 258
[ CZCIONKA SPECJALNA ]

Dzięki edi8 i ralfek, duża pomoc dla mnie za te 100% pełne systemy,pzdr Mariuszbemowo
2015-07-01 (11:16)

status ralfek
Data rejestracji: 2009-07-08
Ilość postów: 3863

4876
wpis nr 914 409
[ CZCIONKA SPECJALNA ]

edi powstało takie coś



http://www.wynikilotto.net.pl/systemystrefowe.htm



sugestie?
2015-07-01 (15:49)

status sindbad
Data rejestracji: 2008-10-13
Ilość postów: 20462

3794
wpis nr 914 475
[ CZCIONKA SPECJALNA ]

Witka!



Dodać systemy do bloków (w tej chwili liczby).

Zmiana gwarancji na mniejszą np. 3/3/4 lub z jednym błędem 4/5 itp. (w tej chwili permutacja).



2015-07-01 (16:24)

status ralfek
Data rejestracji: 2009-07-08
Ilość postów: 3863

4876
wpis nr 914 482
[ CZCIONKA SPECJALNA ]

a jak sobie podasz sindbad w strefie z innym znakiem przestankowym np spacja to spełnia to co masz na myśli? algorytm rozbija po przecinkach tylko



odnośnie gwarancji to ja jestem noga i nie wiem co znaczy zapis 3/3/4, wytłumacz

--- wpis edytowano 2015-07-01 16:24 ---

2015-07-01 (16:43)

status sindbad
Data rejestracji: 2008-10-13
Ilość postów: 20462

3794
wpis nr 914 486
[ CZCIONKA SPECJALNA ]

3/3/4 = trójka przy trójce na cztery skreślenia.

Można podać ilość liczb np. 10

3/3/4/10 = trójka przy trójce na cztery skreślenia z dziesięciu liczb.



O co chodzi z tym znakiem przestankowym



A! Kumam o co chodzi.

Sprawdziłem i działa OK.

--- wpis edytowano 2015-07-01 16:53 ---

2015-07-01 (17:12)

status sindbad
Data rejestracji: 2008-10-13
Ilość postów: 20462

3794
wpis nr 914 488
[ CZCIONKA SPECJALNA ]

2015-07-06 (15:31)

status ralfek
Data rejestracji: 2009-07-08
Ilość postów: 3863

4876
wpis nr 915 739
[ CZCIONKA SPECJALNA ]

sindbad na razie nie przychodzi mi do głowy żaden skuteczny i subtelny sposób zrobienia wyliczania gwarancji..
| Dodaj wpis w tym temacie | Spis tematów | Wyniki lottoStrona: 1
Wyślij wiadomość do admina