moje ... oprogramowanie

Przewiń wpisy ↓	moje ... oprogramowanie
2025-01-31 (15:11) 777ch Data rejestracji: 2005-11-07 Ilość postów: 22656	wpis nr 1 550 641 [ CZCIONKA MONOSPACE ] bingo braki(kombinacji - (adresy(l1, 1) + adresy(l2, 2) + adresy(l3, 3) + adresy(l4, 4) + adresy(l5, 5) + adresy(l6, 6) + adresy(l7, 7)), 0) = 1 i tak tez zrobiłem w paskalu: maska[adr0-(adresy[ld1][1] + adresy[ld2][2] + adresy[ld3][3] + adresy[ld4][4] + adresy[ld5][5] + adresy[ld6][6] + adresy[ld7][7]+ adresy[ld8][8]+ adresy[ld9][9]+ adresy[ld10][10])]:=1; niby nic a zawsze coś --- wpis edytowano 2025-01-31 15:15 ---
2025-01-31 (15:17) fair_play Data rejestracji: 2016-05-12 Ilość postów: 8686	wpis nr 1 550 642 [ CZCIONKA MONOSPACE ] pedanteria W tym paskalu który dostaliśmy czy w następnej przygotowywanej wersji? --- wpis edytowano 2025-01-31 15:19 ---
2025-01-31 (15:20) 777ch Data rejestracji: 2005-11-07 Ilość postów: 22656	wpis nr 1 550 643 [ CZCIONKA MONOSPACE ] W tym paskalu v8 --> który otrzymaliście w następnej przygotowywanej wersji v9 będzie płynna praca robo_warra ulepszonego ciut w kwestii .......lokowania nowego produktu od warr2 do warr10 --- wpis edytowano 2025-01-31 15:25 ---
2025-01-31 (15:37) 777ch Data rejestracji: 2005-11-07 Ilość postów: 22656	wpis nr 1 550 647 [ CZCIONKA MONOSPACE ] robo_warra nie interesuje odnotowane w masce [1] bo jak wiadomo skacze i zamienia , dlatego musi mieć dokładny obraz czyli ile czego i gdzie jest ..... bo inaczej -->tak se można skakać i skakać a efektów brak czyli .....tu przybyło tam ubyło i jest tyle samo
2025-01-31 (16:11) tomson Data rejestracji: 2014-03-05 Ilość postów: 2425	wpis nr 1 550 649 [ CZCIONKA MONOSPACE ] 777ch, wybacz, że się wcinam (po ew. odpowiedzi do skasowania). Postanowiłem grać w EJ stałym 5-cio zakładowym kuponem. Tyle, że komputer wylosował mi 2 razy parkę 6-12. Zostawić czy jedną zmienić? Jakie jest Twoje zdanie?
2025-01-31 (16:42) Jacek_K1961 Data rejestracji: 2017-03-29 Ilość postów: 8870	wpis nr 1 550 653 [ CZCIONKA MONOSPACE ] Fair_play Grypa, czy przeziębienie potocznie zwane grypą? Jeżeli faktycznie grypa, to już trzeba uważać i pamiętać, że lekceważenie odbija się choćby na sercu. To nie jakieś śmichy chichy. Zdrówka! --- wpis edytowano 2025-01-31 16:43 ---
2025-01-31 (16:56) 777ch Data rejestracji: 2005-11-07 Ilość postów: 22656	wpis nr 1 550 656 [ CZCIONKA MONOSPACE ] tomson Ja jeśli gram kilka kuponów to zawsze dwie liczby czyli ta para są na wszystkich kuponach te same. Va bank i tyle🤝 pozdrawiam
2025-01-31 (17:17) kleszek Data rejestracji: 2006-05-27 Ilość postów: 4979	wpis nr 1 550 657 [ CZCIONKA MONOSPACE ] fair_play, kontynuując temat "out of memory" 'wpis nr 1 550 552' warranty 9 out of memory pojawia się wtedy, kiedy największa liczba w rozpisie osiąga 39 braki 211915132 warranty 8 out of memory pojawia się wtedy, kiedy największa liczba w rozpisie osiąga 45 braki 215553195 warranty 7 out of memory pojawia się wtedy, kiedy największa liczba w rozpisie osiąga 55 braki 202927725 warranty 6 out of memory pojawia się wtedy, kiedy największa liczba w rozpisie osiąga 74 braki 185250786 warranty 5 out of memory pojawia się wtedy, kiedy największa liczba w rozpisie osiąga 119 braki 182637273 warranty 4 out of memory pojawia się wtedy, kiedy największa liczba w rozpisie osiąga 258 braki 180352320
2025-01-31 (19:29) fair_play Data rejestracji: 2016-05-12 Ilość postów: 8686	wpis nr 1 550 683 [ CZCIONKA MONOSPACE ] kleszek> Stąd wniosek, że brak pamięci występuje u Ciebie w okolicach 180000000. 39 po 9 = 211 915 132, ale 38 po 9 już tylko 163 011 640 - duża różnica 258 po 4 = 180 352 320, a 257 po 4 = 177 556 160 - tutaj już różnica się zawęziła. Mógłbyś to sprawdzić w miarę dokładnie w takiej pętli: for n=177 556 160 to 180 352 320 step 500 000 Redim tablica(n,1) next i odnotować przy jakim n zabrakło pamięci. Następnie zawęzić testowany przedział i zmniejszyć step do 100 000. i dalej zawężać przedział i zmniejszać step. To wszystko w makro excela poza moją procedurą. Następnie jak już znajdziesz w miarę dokładnie tę graniczną wartość zmień w powyższej pętli Redim tablica(n,1) as byte i zobacz wtedy kiedy zabraknie pamięci. My odnotowujemy braki wpisując do tablicy braków 1 więc deklaracja as byte zupełnie wystarcza. Spróbuję jeszcze odnotowywać brak na bicie nie na bajcie wtedy pamięci powinno wystarczyć 16 razy więcej. Pozdrawiam
2025-01-31 (19:41) kleszek Data rejestracji: 2006-05-27 Ilość postów: 4979	wpis nr 1 550 689 [ CZCIONKA MONOSPACE ] cyt. "Mógłbyś to sprawdzić w miarę dokładnie w takiej pętli: ...... itd. Pewnie mógłbym, tylko pisz do mnie "po polskiemu" bo nic nie rozumiem z Twojej instrukcji. Najlepiej będzie jak przyślesz mi gotowy arkusz z tą pętlą, ja go sobie uruchomię i podam wyniki
2025-01-31 (19:42) Jacek_K1961 Data rejestracji: 2017-03-29 Ilość postów: 8870	wpis nr 1 550 690 [ CZCIONKA MONOSPACE ] Fair_play Może też tak jak w moim sposobie odkodowywania da się to obliczyć tylko sprawdzając np. od tyłu? Od poniedziałku muszę się przyjrzeć.
2025-02-01 (10:10) 777ch Data rejestracji: 2005-11-07 Ilość postów: 22656	wpis nr 1 550 803 [ CZCIONKA MONOSPACE ] fair_play wpis nr 1 550 636 grypa no to życzę zdrówka kolego fair_play ============================= muszę stwierdzić że Twoje rozwiązanie jest znacznie szybsze ale ....... zaimplementowałem tylko dla warranty 5 do programiku korelacje_777ch__fairplay_v4 który jest jednak takim warsztatem czyli beta na maxa bo w nim z marszu próbuję co mi wpadnie do głowy więc choc działa ,to co niektóre rzeczy --> to pomysły mocno chybione ======czas w korelacje_777ch__fairplay_v4====== C(69,25,5,5)=99,9923388441158 % brak[861] Brak {861} starszy proces by fair_play[maska] Sprawdzono zbiór = 11238513 kombinacji Gwar..[5]= 99,9923388441158 % cover=630-linii Time calculated : 0,771194703289548 ms ======czas wg nowej procedury [adresy]====== -- Gwar.5 if [5] --*1 C(69,25,5,5)=99,9923388441158 % brak[861] Brak {861} new proces by fair_play[adresy] Sprawdzono zbiór = 11238513 kombinacji Gwar..[5]= 99,9923388441158 % cover=630-linii Time calculated : 0,394106227321262 ms
2025-02-01 (13:59) fair_play Data rejestracji: 2016-05-12 Ilość postów: 8686	wpis nr 1 550 847 [ CZCIONKA MONOSPACE ] 777ch> Dziękuję za życzenia, jest poprawa, ale choroba musi swoje potrwać Mam pytanie: Jeśli masz taki warunek: IF a=b OR c=d OR e=f OR g=h OR ......... THEN To program sprawdza wszystkie porównania czy już przy pierwszej nierówności przerywa sprawdzanie? Istotne dla kolejności ustawienia warunków. Najbardziej prawdopodobną nierówność dać na początek.
2025-02-01 (14:20) fair_play Data rejestracji: 2016-05-12 Ilość postów: 8686	wpis nr 1 550 849 [ CZCIONKA MONOSPACE ] kleszek> poczta
2025-02-01 (14:20) Jacek_K1961 Data rejestracji: 2017-03-29 Ilość postów: 8870	wpis nr 1 550 850 [ CZCIONKA MONOSPACE ] Fair_play Może porównaj po czasie wykonywania w pętli z milion razy. Przed daj działanie gdzie wynikiem będzie tylko A=B, potem porównaj dla ostatniego warunku np. tylko Y=Z, ale daj ich dużo ??? Jeżeli będą "takie same" to by sugerowało, że sprawdza całą linię warunków. --- wpis edytowano 2025-02-01 14:22 ---
2025-02-01 (14:45) Jacek_K1961 Data rejestracji: 2017-03-29 Ilość postów: 8870	wpis nr 1 550 859 [ CZCIONKA MONOSPACE ] Fair_play Mnie wychodzi "ten sam"/podobny czas. 4,367s i 4,368s dla sprawdzania 1.000.000.000 --- wpis edytowano 2025-02-01 14:48 ---
2025-02-01 (15:15) fair_play Data rejestracji: 2016-05-12 Ilość postów: 8686	wpis nr 1 550 865 [ CZCIONKA MONOSPACE ] Jacku, ile masz "OR" w linii warunku? I jak ustawisz tak dane że nie sprawdza się już pierwszy, a następnie tak, że nie sprawdza się dopiero ostatni dostajesz taki sam czas?
2025-02-01 (15:22) Jacek_K1961 Data rejestracji: 2017-03-29 Ilość postów: 8870	wpis nr 1 550 867 [ CZCIONKA MONOSPACE ] ... a to odpowiedź z SI: W wyrażeniu typu If A=B Or C=D Or F=J Then, w zależności od używanego języka programowania, sprawdzanie warunków może różnić się nieco, ale w większości przypadków działa to w ten sposób: W większości języków programowania, takich jak VBA, Python, czy JavaScript, operator Or działa z tzw. krótkim-circuitingiem (ang. short-circuit evaluation). Oznacza to, że po napotkaniu pierwszego warunku, który jest prawdziwy, nie sprawdza się już pozostałych warunków. Przykład: Jeśli warunek A=B jest prawdziwy, wtedy pozostałe warunki (C=D i F=J) nie będą już sprawdzane, ponieważ cała instrukcja If już zostanie uznana za prawdziwą. ... a ja tak to zrobiłem: Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click Dim A, B, C, D, F, G, H, I, J, K, L, M, N, O, P, Q, R, S, T, U, V, W, X, Y, Z As Integer Dim mainStopwatch As Stopwatch = New Stopwatch() A = 31 : B = 1 : C = 2 : D = 3 : F = 4 : G = 5 : H = 6 : I = 7 : J = 8 : K = 9 : L = 10 : M = 11 : N = 12 : O = 13 : P = 14 : Q = 14 : R = 16 : S = 17 : T = 18 : U = 19 : V = 20 : W = 21 : X = 22 : Y = 23 : Z = 24 mainStopwatch.Start() For xxx = 1 To 1000000000 If A = B Or B = C Or C = D Or D = F Or F = G Or G = H Or H = I Or I = J Or J = K Or K = L Or L = M Or M = N Or N = O Or O = P Or P = Q Then ' NIC End If Next mainStopwatch.Stop() MsgBox("Czas całkowity: " & mainStopwatch.Elapsed.TotalSeconds & " s") ' 4,367 S End Sub Na początku A=1, drugi raz zmieniłem A=31 a Q na 14 Najlepiej dla pewności spróbuj sam. Czas dla A=B 4,355 i P=Q 4,368 --- wpis edytowano 2025-02-01 15:28 ---
2025-02-01 (15:26) fair_play Data rejestracji: 2016-05-12 Ilość postów: 8686	wpis nr 1 550 868 [ CZCIONKA MONOSPACE ] 777ch> Ale mi chodzi o to czy jeżeli w linii warunków miałbyś 100 "OR" to sprawdzanie takiej linii trwałoby tyle samo czasu gdy nie sprawdzałby się już pierwszy warunek czy jak dopiero ostatni. No widzę że jeśli chodzi o VBA to Jacek z pomocą SI zaspokoił moją ciekawość. Czy tak samo jest w pascalu? --- wpis edytowano 2025-02-01 15:30 ---
2025-02-01 (15:29) Jacek_K1961 Data rejestracji: 2017-03-29 Ilość postów: 8870	wpis nr 1 550 869 [ CZCIONKA MONOSPACE ] Gości mam. Sorrki.


\| Dodaj wpis w tym temacie \| Spis tematów \| Wyniki lotto	Strona: 1 2 ... 532 533 534 ... 554 555 Wyślij wiadomość do admina Czcionka o stałej szerokości

Forum strony www.multipasko.pl [Regulamin]