Forum strony www.multipasko.pl [Regulamin]


Dodaj wpis w tym temacie
Spis tematów
Login:

Hasło:
Strona: 1 2 ... 520 521 522 ... 554 555
Wyślij wiadomość do admina

Przewiń wpisy ↓

moje ... oprogramowanie

2025-01-26 (17:42)

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

1386
wpis nr 1 549 598
[ CZCIONKA MONOSPACE ]

4
2025-01-26 (17:56)

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

14865
wpis nr 1 549 602
[ CZCIONKA MONOSPACE ]


Jak odblokujesz:
' Range(Cells(1, 32), Cells(liczb, 38)) = adresy

To wyświetli Ci się tablica adresów stanowiąca sedno procedury
2025-01-26 (18:00)

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

1386
wpis nr 1 549 605
[ CZCIONKA MONOSPACE ]

fair_play
widzę wiele ...... ale sorry
już muszę sie zwijać
prawa ręka mi ....."puchnie"
od pisania na klawiaturze
2025-01-27 (09:04)

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

1386
wpis nr 1 549 691
[ CZCIONKA MONOSPACE ]

fair_play

Odbierz pocztę.

Poprawa czasu
jedynie ! dotyczy

sytuacji gdy mamy duże adresy
a mało liczb w sekwencji .......
bo każdorazowo [if] spowalnia.......

ale widzę że przelicza nieprawidłowo
ta ..poprawka
2025-01-27 (11:17)

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

14865
wpis nr 1 549 710
[ CZCIONKA MONOSPACE ]

777ch>

Witaj.
Taką wersję z naliczaniem braków na bieżąco miałem, ale była wolniejsza więc naliczambraki po fakcie.
Twoja poprawka niestety powoduje błędy:
Np analiza zbioru z LaJola C(40,15,6) wygląda

tak u Ciebie:

zdjęcie

a tak u mnie:

zdjęcie
2025-01-27 (11:33)

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

14865
wpis nr 1 549 712
[ CZCIONKA MONOSPACE ]


Najpierw naliczasz braki a dopiero potem wstawiasz "1":

If braki(kombinacji - kod, 1) <> 1 Then ile = ile + 1
braki(kombinacji - kod, 1) = 1

W ten sposób zawsze ilość braków będzie równa ilości kombinacji

2025-01-27 (14:04)

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

1386
wpis nr 1 549 752
[ CZCIONKA MONOSPACE ]

Hej
Już po wysłaniu tobie
załapałem się ..
że to tak se nie da 🤭

ale wobec tego zaimplementowałem
sprawdzanie z pliku tylko 7-ek
dla v=max=74
I odpaliłem sprawdzenie pliku z la Jolki
nie pamiętam jakiego ale Ci napiszę jak wrócę
bo mnie nie ma 🤗

No i odpalę potem sprawdzenie tego samego w aplikacji
według starej wersji
No
I wkleję różnicę czasu

Gdybyś tak to skonstruawał,
by pomijane były kody już wyłapane
to by śmigało…że hej 🫢
bo przecież olbrzymia liczba 7-ek się powtarza
w takim pliku co ma 20 tyś linii
i 25 liczb w sekwencji 😥

--- wpis edytowano 2025-01-27 14:06 ---

2025-01-27 (14:31)

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

14865
wpis nr 1 549 762
[ CZCIONKA MONOSPACE ]


"Gdybyś tak to skonstruawał,
by pomijane były kody już wyłapane
to by śmigało…że hej"

Nie wymagaj abym rozwiązał problem kwadratury koła
2025-01-27 (15:33)

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

14865
wpis nr 1 549 773
[ CZCIONKA MONOSPACE ]


"To se ne da pane Havranek..."

Tzn. jak twierdzi MultiTest w programowaniu wszystko się da, tylko trzeba wiedzieć jak
Więc i tutaj by się dało tyle tylko, że ze znaczną stratą czasu.

Jeżeli w dwóch 25 liczbowych liniach występują identyczne siódemki, to nie można tak po prostu usunąć jedną z nich, bo każda część każdej z tych siódemek tworzy inne siódemki z pozostałymi 18 liczbami w linii.
Trzeba każdą 25 liczbową linię rozłożyć na unikalne siódemki, a jest ich 25 po 7 = 480 700, i dopiero wtedy pomijać duplikaty.
Ale przecież rozkład każdej z linii na siódemki robię w tych pętlach For...Next i przy okazji tylko odnotowuję ich wystąpienie.

Problem, z duplikatami może udałoby się rozwiązać za pomocą instrukcji SQLa, SELECT DISTINCT..., po ustanowieniu odpowiednich indeksów i relacji między tablicami, ale to już nie Excel .

Mam pytania z innej beczki:
1. Czy gdybyś tak po prostu tę moją procedurę w formacie txt wstawił do paskala to on jej nie zrozumie? Przecież używam tylko podstawień, pętli For...Next i warunków IF chyba znanych paskalowi.

2. Czy myślałeś nad rozpisami o różnych długościach linii, zapewniających zadane gwarancje?
2025-01-27 (16:14)

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

1386
wpis nr 1 549 777
[ CZCIONKA MONOSPACE ]

jeszcze nie czytałem forum

--------stara wersja---------
-- Gwar.7 if [7] --*1
C(74,25,7,7)=100 % brak[0]
Brak {0}
Sprawdzono zbiór = 1799579064 kombinacji
Gwar..[7]= 100 %

Time calculated : 646389,211 ms
------------nowa wersja--------

Max adres7/kod7: 1799579064
Brak7: 0

w {plik.txt} Vmax :=74
w {plik.txt} kmax :=25

Liczba linni sprawdzanych : 23240
Time calculated : 574043,26 ms

tak to zaimplementowałem na szybko
cirka 30 minut pracy .........

jeszcze się nie bawiłem
wiec co najwyżej poprawię
w następnej wersji
bez wypisu braków ,same procedury
jak podeslałeś .......
zaraz pójdzie w zipie


2025-01-27 (16:16)

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

1386
wpis nr 1 549 778
[ CZCIONKA MONOSPACE ]

Problem, z duplikatami może udałoby się rozwiązać za pomocą instrukcji SQLa, SELECT DISTINCT..., po ustanowieniu odpowiednich indeksów i relacji między tablicami

--------------------------------------
najpierw zobacz czy to prawidłowo działa ......
zaraz wyślę
2025-01-27 (16:26)

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

1386
wpis nr 1 549 780
[ CZCIONKA MONOSPACE ]

coś przekłamuje liczbę braków
o 1-brak

przy 6-kach i przy 5-kach

no
2025-01-27 (16:44)

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

14865
wpis nr 1 549 783
[ CZCIONKA MONOSPACE ]


Niestety przy każdym z wariantów: Out of memory
2025-01-27 (16:44)

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

1386
wpis nr 1 549 784
[ CZCIONKA MONOSPACE ]

fair_play

ustaw może 15 liczb z 30
wygeneruj plik losowo
i potem odpal sprawdzanie gwarancji

czyli tak ustaw

i kliknij najpierw losowe

a potem zobacz czy masz pamięć

--- wpis edytowano 2025-01-27 16:46 ---

2025-01-27 (16:59)

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

1386
wpis nr 1 549 785
[ CZCIONKA MONOSPACE ]

fair_play
wypakuj nowe i stare usuń

co z twoja pamięcią

czyli masz nowa pocztę !

--- wpis edytowano 2025-01-27 17:00 ---

2025-01-27 (17:07)

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

1386
wpis nr 1 549 786
[ CZCIONKA MONOSPACE ]

fair_play

tablice dynamiczne,i zobacz sobie jakie obciążenie
--> pokazuje Twój manager zadań

u mnie np.:

zaznaczyłem co pokazuje manager
2025-01-27 (17:08)

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

1386
wpis nr 1 549 787
[ CZCIONKA MONOSPACE ]


dobra
czekam co ........ napiszesz
2025-01-27 (17:21)

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

14865
wpis nr 1 549 789
[ CZCIONKA MONOSPACE ]


Niestety czały czas brak pamięci:

zdjęcie

ale w pliku Jolki C(30,15,6)
usunąłem 10 ostatnich linii i wyniki mam takie:

zdjęcie
2025-01-27 (17:33)

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

1386
wpis nr 1 549 793
[ CZCIONKA MONOSPACE ]

fair_play
przecież jak otworzysz program
to jest 1500k obciązenia

wtedy ustaw v=20 a k=10 i kliknij w losowe
to niemożliwe jest .......co piszesz

a...... pokaż mi obciążenie z managera
2025-01-27 (17:37)

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

1386
wpis nr 1 549 794
[ CZCIONKA MONOSPACE ]

Gwarancja[7] : 64,84870812%
Time calculated : 190,498 ms

Gwarancja[6] : 98,70018104%
Time calculated : 124,373 ms

Gwarancja[5] : 100%
Time calculated : 98,884 ms

Gwarancja[4] : 100%
Time calculated : 37,658 ms
| Dodaj wpis w tym temacie | Spis tematów | Wyniki lottoStrona: 1 2 ... 520 521 522 ... 554 555
Wyślij wiadomość do admina