| Dodaj wpis w tym temacie
Spis tematów | Strona: 1 2 ... 539 540 541 ... 560 561 Wyślij wiadomość do admina |
| Przewiń wpisy ↓ | moje ... oprogramowanie |
2025-02-15 (00:20) 777chData rejestracji: 2005-11-07 Ilość postów: 23087 | wpis nr 1 552 924 [ CZCIONKA MONOSPACE ] MultiTest, Jacek_K1961 ========================================== 4914 ≤ C(75,25,7) ≤ 25085 Created by: Dietmar Pree Method of Construction: Local search ========================================== Sam proces nadania dla każdej sekwencji kodu csn zajmuje czas. Stąd ,jeśli był by to proces wielowątkowy czyli : jednocześnie wiele wątków wykonawczych. To czas byłby podzielony przez liczbę watków cirka co niestety...... jest uzależnione od liczby rdzeni procesora. Dlatego pytałem Cię MultiTest o limity ........ bo ty nie kodujesz sekwencji, tylko zliczasz na tlist lub w tablicy ...... tylko unikaty .......... i podstawie ilości duplikatów wykonujesz tylko i wyłącznie samo przeliczenie. Stad te niskie czasy........... ale zarazem blokada bo przepełnienie pamięci jest tylko kwestią czasu , a dokładnie ilością sekwencji do przeliczeń. no ...... taka naga prawda Poniżej same czasy kodowania czyli absolutne minimum dojdzie tylko jedna linia kodu co ciut podwyzszy czas przeliczeń czyli przypisanie do tablicy w miejsce kodu csn zamiast 0 kod 1 ale ten proces wyłączyłem tu, abyście mogli poznać te czasy minimalne, NO I OCZYWIŚCIE drugi powód to brak miejsca dla całości obliczeń w jednej tablicy. -----------------Minimalne czasy ---------------------- algorytm przeliczeń [7,8,9,10] --> na kody csn ! wykonane na bazie rozpisu C(75,25,7) ≤ 25085 =============================================== Max adres7/kod7: 1984829850 --- Test samego czasu kodowania sekwencji warr[7] --- --- bez bez analizy duplikatów --- Liczba linii sprawdzanych : 25085 Time calculated : 18,1537864385363 s =============================================== Max adres8/kod8: 16871053725 --- Test samego czasu kodowania sekwencji warr[8] --- --- bez bez analizy duplikatów --- Liczba linii sprawdzanych : 25085 Time calculated : 38,9180583739101 s =============================================== Max adres9/kod9: 125595622175 --- Test samego czasu kodowania sekwencji warr[9] --- --- bez bez analizy duplikatów --- Liczba linii sprawdzanych : 25085 Time calculated : 92,4619225531904 s =============================================== Max adres10/kod10: 828931106355 --- Test samego czasu kodowania sekwencji warr[10] --- --- bez bez analizy duplikatów --- Liczba linii sprawdzanych : 25085 Time calculated : 225,060476609014 s =============================================== --- wpis edytowano 2025-02-15 00:22 --- |
2025-02-15 (00:38) MultiTestData rejestracji: 2020-08-05 Ilość postów: 6561 | wpis nr 1 552 925 [ CZCIONKA MONOSPACE ] 777ch Czy celem jest CSN i ogromne tablice ? Czy dla prawidłowego wyliczenia gwarancji można się bez tego obejść ? |
2025-02-15 (00:39) 777chData rejestracji: 2005-11-07 Ilość postów: 23087 | wpis nr 1 552 926 [ CZCIONKA MONOSPACE ] Jeszcze raz ............ MultiTest Fakt, jest limit w tablicy dynamicznej. Podaj co u Ciebie się sprawdziło i w jakim czasie . Może na pocżątku ta setka dwudziestek na 10 warranty. ------------------------------------------------------------------ Ja zrobiłem tak ,że jak program wykryje przeliczanie ponad wielkość tablicy to wykonuje obliczenia dzielone czyli ładuje do tablicy tylko tyle ile się zmieści. Jeśli wykryje że zmieści całość to wykonuje obliczenia bez podziału na sektory csn. To zapewnia pewność wykonania 100% tyle że.......kosztuje czas . np. w przypadku np: ![]() a liczyłem to: 01 03 07 09 10 13 15 16 20 21 22 25 26 31 35 37 38 39 43 45 46 47 50 51 52 60 61 62 64 65 66 68 69 71 73 74 75 76 78 80 01 03 04 05 07 08 10 14 15 17 18 19 20 21 25 26 28 32 34 35 38 40 42 44 49 50 52 56 59 61 63 65 66 67 68 73 74 75 78 80 01 04 05 06 07 08 09 13 15 16 18 27 29 31 35 37 38 40 41 43 45 47 49 50 51 52 53 54 57 60 61 63 65 69 70 72 73 76 78 80 01 05 07 14 15 16 22 26 28 29 31 32 36 37 38 41 42 43 44 45 46 47 48 50 51 54 58 61 62 63 64 67 68 69 72 73 74 76 77 78 01 02 04 05 07 08 10 11 13 15 16 17 19 20 22 24 25 26 28 29 30 31 32 37 40 44 48 50 51 53 54 59 63 66 67 71 72 73 75 79 01 02 04 07 09 12 15 16 17 22 25 27 28 29 30 31 33 36 37 38 39 42 43 45 46 50 54 56 57 58 60 63 65 67 73 74 76 78 79 80 01 02 03 04 05 06 07 09 11 14 19 25 26 29 31 34 36 39 40 42 43 44 45 48 51 52 55 56 57 58 59 60 67 70 71 73 76 77 78 80 02 03 04 05 06 07 13 16 17 18 22 24 25 27 28 29 31 34 35 37 39 40 41 44 48 49 50 54 56 57 59 61 62 63 65 67 69 74 75 79 01 02 04 05 10 14 15 17 18 20 22 25 26 28 29 32 34 35 40 41 42 48 49 50 53 55 56 57 61 63 66 68 71 74 75 76 77 78 79 80 01 04 05 06 08 13 15 17 19 20 29 31 32 33 35 38 41 44 45 47 49 51 54 55 57 58 59 60 61 63 66 67 68 69 73 75 76 77 78 79 02 04 06 07 08 10 12 13 14 18 19 20 23 26 27 30 31 32 34 39 43 45 47 52 53 54 58 59 61 62 63 66 68 69 75 76 77 78 79 80 01 03 06 08 11 12 13 14 20 21 22 23 24 26 28 30 31 39 43 46 48 50 52 53 58 60 61 62 63 65 66 67 71 72 73 75 76 77 78 79 01 02 03 04 06 09 10 13 14 16 18 21 23 24 25 27 28 29 32 34 36 37 38 40 43 44 45 47 48 50 51 53 54 56 63 66 70 76 79 80 01 02 04 05 07 08 09 11 12 13 15 16 19 21 30 32 34 35 37 40 43 44 47 48 49 51 52 54 57 58 59 60 61 63 64 66 67 72 73 79 01 03 04 06 07 10 13 14 15 17 21 27 29 35 37 42 44 45 48 50 53 55 58 59 62 63 64 65 66 68 69 70 71 72 73 74 76 77 78 80 01 02 03 04 05 06 07 09 11 15 16 17 26 27 28 30 32 36 39 40 42 46 47 51 52 55 56 57 59 60 62 65 66 68 69 70 71 74 76 80 01 02 03 04 05 07 08 10 13 18 22 24 26 28 29 33 35 36 42 44 45 47 48 49 50 53 54 57 59 62 63 64 65 67 68 71 72 75 77 78 01 04 09 10 12 14 15 17 18 20 22 23 29 30 31 32 33 35 36 37 40 41 43 44 47 48 52 53 54 56 57 59 63 68 71 72 73 75 77 80 01 03 04 05 06 08 09 10 11 14 15 20 22 26 28 33 34 35 37 38 39 46 47 49 50 51 52 53 57 58 59 66 67 68 69 71 75 76 77 78 01 02 03 06 09 11 12 13 15 16 18 20 22 26 27 28 32 33 36 37 38 39 40 42 43 44 49 50 54 56 57 59 61 64 66 69 74 76 77 78 01 02 04 07 08 09 11 12 14 15 20 22 23 27 28 29 31 33 35 37 38 39 40 43 44 45 46 48 49 51 52 53 55 59 62 64 66 69 77 79 03 04 05 08 09 13 14 16 17 18 19 26 27 29 31 33 35 36 37 38 40 44 45 47 50 51 52 53 56 57 61 62 64 65 66 69 75 76 77 80 01 06 08 10 12 13 14 15 19 20 22 29 30 34 35 37 38 40 43 45 46 47 48 50 54 55 56 61 62 65 66 67 68 71 73 74 76 77 79 80 01 02 04 05 06 12 15 18 19 20 23 24 25 26 32 35 37 40 42 43 47 48 49 51 52 53 55 58 61 62 63 64 65 67 69 73 74 76 77 80 01 02 05 07 08 09 10 11 16 17 18 20 21 22 23 25 26 27 31 33 38 39 41 43 44 45 46 51 52 57 59 62 63 66 69 70 72 75 77 79 04 11 12 14 17 18 19 20 22 26 32 34 35 37 39 41 42 44 45 47 48 49 50 55 58 59 60 61 63 64 67 68 69 72 73 74 75 76 79 80 04 05 06 07 08 09 10 12 16 21 25 28 30 31 32 34 36 37 42 45 53 56 57 59 60 61 63 64 65 69 70 71 72 73 74 75 76 77 79 80 01 02 03 05 08 12 15 16 17 20 23 24 25 26 29 30 35 43 46 47 49 52 53 54 56 57 58 59 60 62 63 65 69 70 71 76 77 78 79 80 01 03 07 10 11 12 16 17 19 20 24 26 27 28 29 30 31 32 35 37 41 42 46 51 52 54 55 56 62 63 64 65 67 69 73 74 75 77 78 79 02 03 05 07 08 09 10 11 12 15 22 23 26 30 31 33 34 35 36 37 41 43 46 47 49 51 59 60 63 64 65 66 68 70 72 73 75 76 79 80 03 05 08 11 12 13 16 18 21 26 27 31 35 36 37 38 40 43 44 45 46 47 49 50 51 54 55 57 58 60 61 62 65 66 68 71 73 75 77 80 01 03 04 06 08 09 11 14 16 24 25 27 30 31 33 34 35 40 45 46 47 48 50 51 52 53 54 58 59 62 64 66 68 69 73 75 76 77 79 80 01 02 04 06 07 08 11 13 14 15 16 24 25 28 31 33 36 37 39 40 43 44 45 47 48 50 52 54 56 57 59 61 63 64 65 70 72 75 76 78 01 02 03 04 05 07 08 10 15 16 17 18 21 22 29 30 31 33 34 36 37 38 41 42 43 45 46 47 48 50 56 58 60 63 64 65 66 68 75 76 01 04 05 06 07 10 11 13 14 15 16 19 21 25 27 28 30 34 36 40 41 44 46 47 48 49 51 52 56 57 58 62 64 65 71 72 74 77 78 80 01 06 07 09 10 12 13 16 20 21 23 24 26 27 35 37 40 41 42 43 46 47 50 51 52 53 55 57 59 62 64 65 66 67 69 71 72 74 78 80 01 02 05 08 13 14 16 17 18 19 20 21 25 27 28 29 30 31 35 38 39 44 46 47 48 51 54 56 59 60 63 64 65 71 72 74 75 76 77 79 01 02 07 10 15 17 19 20 24 25 27 28 29 30 31 34 36 37 40 42 44 45 48 49 50 51 52 55 56 58 59 64 66 67 70 72 75 76 79 80 01 02 03 05 06 10 14 15 16 18 20 22 23 25 27 28 29 31 32 33 35 39 40 41 44 46 48 52 53 55 56 57 59 62 66 68 69 75 76 79 01 04 06 09 10 11 13 18 19 20 21 23 27 28 30 32 33 34 36 37 41 43 45 48 51 54 56 59 60 61 62 65 66 68 69 72 73 74 75 77 |
2025-02-15 (00:55) 777chData rejestracji: 2005-11-07 Ilość postów: 23087 | wpis nr 1 552 928 [ CZCIONKA MONOSPACE ] Dla np: 05 08 11 13 21 24 27 29 30 31 35 39 42 44 48 50 51 52 60 66 72 73 80 88 89 01 03 08 16 17 20 23 29 37 38 42 45 57 59 61 62 74 79 83 84 85 91 95 97 98 06 15 17 18 20 33 38 39 41 42 45 47 52 54 55 56 58 60 64 70 71 78 89 96 99 01 06 09 16 17 22 23 40 43 45 48 50 52 57 59 60 65 66 69 70 73 79 89 93 99 warr[7] ![]() warr[8] ![]() dla warr[9] oraz dla warr[10] tez policzy ale szkoda mi czasu ................ potrzebna jest tablica --> bit stores just a 0 or 1 : Integers are typically stored with either 4 or 8 bytes 4 bytes can store numbers between -2147483648 and 2147483647 8 bytes can store numbers between -9223372036854775808 and 9223372036854775807 tu czytaj: https://web.stanford.edu/class/cs101/bits-bytes.html |
2025-02-15 (01:01) 777chData rejestracji: 2005-11-07 Ilość postów: 23087 | wpis nr 1 552 929 [ CZCIONKA MONOSPACE ] 777ch Czy celem jest CSN i ogromne tablice ? Czy dla prawidłowego wyliczenia gwarancji można się bez tego obejść ? ============================== Najlepsza koncepcja to oczywiście taka by czas był krótki a obliczenia prawidłowe i bez przepełnienia pamięci ....... by szło na starszym łapku z 8gb ramu by np. fair_play dał rady policzyć Nic .....tylko zrobić a policzyłem w tym czasie dla warr[9] te cztery linie co podałem powyżej ![]() |
2025-02-15 (01:09) 777chData rejestracji: 2005-11-07 Ilość postów: 23087 | wpis nr 1 552 930 [ CZCIONKA MONOSPACE ] MultiTest zrób i podaj czasy tak by liczył niezależnie od v,k,b czyli np dla: 15848 ≤ C(74,25,8) ≤ 113348 https://ljcr.dmgordon.org/cover/show_cover.php?v=74&k=25&t=8 |
2025-02-15 (01:36) MultiTestData rejestracji: 2020-08-05 Ilość postów: 6561 | wpis nr 1 552 931 [ CZCIONKA MONOSPACE ] 777ch Wszystko ma swoje plusy i minusy , jak to mówią wyniki mają być poprawne ale zawsze coś jakimś kosztem, tu akurat jestem dobry ![]() ![]() ![]() ![]() |
2025-02-15 (02:32) 777chData rejestracji: 2005-11-07 Ilość postów: 23087 | wpis nr 1 552 932 [ CZCIONKA MONOSPACE ] ok fair_play może te przykłady pomogą trzeba by pomyśleć jak zakodować liczbę w masce tak by liczba determinowała wynik ale ...... sam muszę to ogarnąć bo nie robiłem nic podobnego. function HasMultipleBitsSetInByte ( b: byte ): boolean; begin result := not ( b in [ 0, 1, 2, 4, 8, 16, 32, 64, 127 ] ); end; function BoolToStr(Value : Boolean) : String; begin if Value then result := '1' else result := '0'; end; procedure TForm1.BitBtn2Click(Sender: TObject); var a:byte; b:string; begin SetLength(maska, spinedit8.value); a:=spinedit8.value; maska[1]:=a; memowarr.lines.Add('test bit in mask['+inttostr(1)+'],value w masce= ('+inttostr(a)+') --> results: '+BoolToStr(HasMultipleBitsSetInByte(maska[1]))) ; maska:=nil; end; i takie wyniki; test bit in mask[1],value w masce= (1) --> results: 0 .......[HasMultipleBitsSetInByte jest value=1] test bit in mask[1],value w masce= (2) --> results: 0.......[HasMultipleBitsSetInByte jest value=2] test bit in mask[1],value w masce= (3) --> results: 1 test bit in mask[1],value w masce= (4) --> results: 0.......[HasMultipleBitsSetInByte jest value=4] test bit in mask[1],value w masce= (5) --> results: 1 test bit in mask[1],value w masce= (6) --> results: 1 test bit in mask[1],value w masce= (7) --> results: 1 test bit in mask[1],value w masce= (8) --> results: 0.......[HasMultipleBitsSetInByte jest value=8] test bit in mask[1],value w masce= (9) --> results: 1 test bit in mask[1],value w masce= (10) --> results: 1 test bit in mask[1],value w masce= (11) --> results: 1 test bit in mask[1],value w masce= (12) --> results: 1 test bit in mask[1],value w masce= (13) --> results: 1 test bit in mask[1],value w masce= (14) --> results: 1 test bit in mask[1],value w masce= (15) --> results: 1 test bit in mask[1],value w masce= (16) --> results: 0.......[HasMultipleBitsSetInByte jest value=16] test bit in mask[1],value w masce= (17) --> results: 1 test bit in mask[1],value w masce= (18) --> results: 1 test bit in mask[1],value w masce= (19) --> results: 1 test bit in mask[1],value w masce= (20) --> results: 1 test bit in mask[1],value w masce= (21) --> results: 1 test bit in mask[1],value w masce= (22) --> results: 1 test bit in mask[1],value w masce= (23) --> results: 1 test bit in mask[1],value w masce= (24) --> results: 1 test bit in mask[1],value w masce= (25) --> results: 1 test bit in mask[1],value w masce= (26) --> results: 1 test bit in mask[1],value w masce= (27) --> results: 1 test bit in mask[1],value w masce= (28) --> results: 1 test bit in mask[1],value w masce= (29) --> results: 1 test bit in mask[1],value w masce= (30) --> results: 1 test bit in mask[1],value w masce= (31) --> results: 1 test bit in mask[1],value w masce= (32) --> results: 0.......[HasMultipleBitsSetInByte jest value=32] test bit in mask[1],value w masce= (33) --> results: 1 test bit in mask[1],value w masce= (34) --> results: 1 test bit in mask[1],value w masce= (35) --> results: 1 test bit in mask[1],value w masce= (36) --> results: 1 test bit in mask[1],value w masce= (37) --> results: 1 test bit in mask[1],value w masce= (38) --> results: 1 test bit in mask[1],value w masce= (39) --> results: 1 test bit in mask[1],value w masce= (40) --> results: 1 test bit in mask[1],value w masce= (41) --> results: 1 test bit in mask[1],value w masce= (42) --> results: 1 test bit in mask[1],value w masce= (43) --> results: 1 test bit in mask[1],value w masce= (44) --> results: 1 test bit in mask[1],value w masce= (45) --> results: 1 test bit in mask[1],value w masce= (46) --> results: 1 test bit in mask[1],value w masce= (47) --> results: 1 test bit in mask[1],value w masce= (48) --> results: 1 test bit in mask[1],value w masce= (49) --> results: 1 test bit in mask[1],value w masce= (50) --> results: 1 test bit in mask[1],value w masce= (51) --> results: 1 test bit in mask[1],value w masce= (52) --> results: 1 test bit in mask[1],value w masce= (53) --> results: 1 test bit in mask[1],value w masce= (54) --> results: 1 test bit in mask[1],value w masce= (55) --> results: 1 test bit in mask[1],value w masce= (56) --> results: 1 test bit in mask[1],value w masce= (57) --> results: 1 test bit in mask[1],value w masce= (58) --> results: 1 test bit in mask[1],value w masce= (59) --> results: 1 test bit in mask[1],value w masce= (60) --> results: 1 test bit in mask[1],value w masce= (61) --> results: 1 test bit in mask[1],value w masce= (62) --> results: 1 test bit in mask[1],value w masce= (63) --> results: 1 test bit in mask[1],value w masce= (64) --> results: 0.......[HasMultipleBitsSetInByte jest value=64] test bit in mask[1],value w masce= (65) --> results: 1 test bit in mask[1],value w masce= (66) --> results: 1 test bit in mask[1],value w masce= (67) --> results: 1 test bit in mask[1],value w masce= (68) --> results: 1 test bit in mask[1],value w masce= (69) --> results: 1 test bit in mask[1],value w masce= (70) --> results: 1 test bit in mask[1],value w masce= (71) --> results: 1 test bit in mask[1],value w masce= (72) --> results: 1 test bit in mask[1],value w masce= (73) --> results: 1 test bit in mask[1],value w masce= (74) --> results: 1 test bit in mask[1],value w masce= (75) --> results: 1 test bit in mask[1],value w masce= (76) --> results: 1 test bit in mask[1],value w masce= (77) --> results: 1 test bit in mask[1],value w masce= (78) --> results: 1 test bit in mask[1],value w masce= (79) --> results: 1 test bit in mask[1],value w masce= (80) --> results: 1 test bit in mask[1],value w masce= (81) --> results: 1 test bit in mask[1],value w masce= (82) --> results: 1 test bit in mask[1],value w masce= (83) --> results: 1 test bit in mask[1],value w masce= (84) --> results: 1 test bit in mask[1],value w masce= (85) --> results: 1 test bit in mask[1],value w masce= (86) --> results: 1 test bit in mask[1],value w masce= (87) --> results: 1 test bit in mask[1],value w masce= (88) --> results: 1 test bit in mask[1],value w masce= (89) --> results: 1 test bit in mask[1],value w masce= (90) --> results: 1 test bit in mask[1],value w masce= (91) --> results: 1 test bit in mask[1],value w masce= (92) --> results: 1 test bit in mask[1],value w masce= (93) --> results: 1 test bit in mask[1],value w masce= (94) --> results: 1 test bit in mask[1],value w masce= (95) --> results: 1 test bit in mask[1],value w masce= (96) --> results: 1 test bit in mask[1],value w masce= (97) --> results: 1 test bit in mask[1],value w masce= (98) --> results: 1 test bit in mask[1],value w masce= (99) --> results: 1 test bit in mask[1],value w masce= (100) --> results: 1 test bit in mask[1],value w masce= (101) --> results: 1 test bit in mask[1],value w masce= (102) --> results: 1 test bit in mask[1],value w masce= (103) --> results: 1 test bit in mask[1],value w masce= (104) --> results: 1 test bit in mask[1],value w masce= (105) --> results: 1 test bit in mask[1],value w masce= (106) --> results: 1 test bit in mask[1],value w masce= (107) --> results: 1 test bit in mask[1],value w masce= (108) --> results: 1 test bit in mask[1],value w masce= (109) --> results: 1 test bit in mask[1],value w masce= (110) --> results: 1 test bit in mask[1],value w masce= (111) --> results: 1 test bit in mask[1],value w masce= (112) --> results: 1 test bit in mask[1],value w masce= (113) --> results: 1 test bit in mask[1],value w masce= (114) --> results: 1 test bit in mask[1],value w masce= (115) --> results: 1 test bit in mask[1],value w masce= (116) --> results: 1 test bit in mask[1],value w masce= (117) --> results: 1 test bit in mask[1],value w masce= (118) --> results: 1 test bit in mask[1],value w masce= (119) --> results: 1 test bit in mask[1],value w masce= (120) --> results: 1 test bit in mask[1],value w masce= (121) --> results: 1 test bit in mask[1],value w masce= (122) --> results: 1 test bit in mask[1],value w masce= (123) --> results: 1 test bit in mask[1],value w masce= (124) --> results: 1 test bit in mask[1],value w masce= (125) --> results: 1 test bit in mask[1],value w masce= (126) --> results: 1 test bit in mask[1],value w masce= (127) --> results: 0.......[HasMultipleBitsSetInByte jest value=127] |
2025-02-15 (02:36) 777chData rejestracji: 2005-11-07 Ilość postów: 23087 | wpis nr 1 552 933 [ CZCIONKA MONOSPACE ] dobrej nocki MultiTest tam gdzie zmieścisz się z ...... ilością zawsze będziesz miał szybszy czas ale......... to nie działa zawsze na bank od a do z a musi |
2025-02-15 (02:44) 777chData rejestracji: 2005-11-07 Ilość postów: 23087 | wpis nr 1 552 934 [ CZCIONKA MONOSPACE ] test bit in mask[1],value w masce= (1) --> results: 0 .......[HasMultipleBitsSetInByte jest value=1] test bit in mask[1],value w masce= (2) --> results: 0.......[HasMultipleBitsSetInByte jest value=2] test bit in mask[1],value w masce= (3) --> results: 1 test bit in mask[1],value w masce= (4) --> results: 0.......[HasMultipleBitsSetInByte jest value=4] test bit in mask[1],value w masce= (5) --> results: 1 zakodować czyli zamiast maska[adr]:=1 lub 0 zrobić tak: maska[adres]:=1 czyli -->results=0 maska[adres]:=3 czyli -->results=1 maska[adres]:=4 czyli -->results=0 maska[adres]:=5 czyli -->results=1 na pewno rozumiesz tylko ...... to trzeba ogarnąć w całości |
2025-02-15 (03:12) 777chData rejestracji: 2005-11-07 Ilość postów: 23087 | wpis nr 1 552 935 [ CZCIONKA MONOSPACE ] najlepiej by było aby w masce typu jak poniżej maska: Array of Shortint; /// Shortint is a signed integer in the range of -128 to 127. The shortint is 8 bits long. /// zmieścić nie jeden wynik czyli 0 lub 1 tylko --> 8 wyników [11110001]; // binary number] czyli 8x więcej danych wejdzie do tablicy tylko trzeba to jeszcze potem na końcu odczytać jako 8 kodów csn każdy kod z [11110001] to np. dla maski[1]=[liczba ?]=kod8bitów = [11110001] bit1:= csn=adres =0000000001- sekwencja =true bit2:= csn=adres =1800000000- sekwencja =true bit3:= csn=adres =3600000000- sekwencja =true bit4:= csn=adres =5400000000- sekwencja =true bit5:= csn=adres =7200000000- sekwencja =false bit6:= csn=adres =9000000000- sekwencja =false bit7:= csn=adres =10800000000- sekwencja =false bit8:= csn=adres =12600000000- sekwencja =true może ogarniemy to ......kiedyś --- wpis edytowano 2025-02-15 03:25 --- |
2025-02-15 (03:19) 777chData rejestracji: 2005-11-07 Ilość postów: 23087 | wpis nr 1 552 936 [ CZCIONKA MONOSPACE ] trzeba tylko zakodować jeszcze te --> 8 wyników [11110001]; // w jednej liczbie do 255 lub stringu do 255 ja ma ten typ: shortint dla maski ale mogę zmienić na typ: byte i tyle zachodu ...... w niedochodowym pomyśle --- wpis edytowano 2025-02-15 03:19 --- |
2025-02-15 (10:02) 777chData rejestracji: 2005-11-07 Ilość postów: 23087 | wpis nr 1 552 954 [ CZCIONKA MONOSPACE ] hejka szkolenie i ciekawy kod https://jonlennartaasenden.wordpress.com/2018/08/10/building-a-delphi-database-engine-part-one/ --- wpis edytowano 2025-02-15 10:06 --- |
2025-02-15 (12:49) MultiTestData rejestracji: 2020-08-05 Ilość postów: 6561 | wpis nr 1 552 974 [ CZCIONKA MONOSPACE ] 777ch Problem czy używać tablicy ? niech limit to rozmiar wynikający z liczby kombinacji po 10 z 99 czyli 15579278510796 bajtów i używając Tbits zmiejszysz 8 krotnie ten rozmiar a i tak można wykończyć system taką tablicą. Zarządzanie dynamiczne ? Ostatecznie można podzielić to wiele tablic, dla delphin32 po 2 GB. Raczej to nie przyśpieszy. Inne rozwiązanie poza tablicą też potrzebuje dużo RAM . Więc co pozostaje ? Tak i czy owak wygląda to że na razie i moim i Twoim rozwiązaniu ...za krótka kołdra Niemniej może warto jeszcze inne pomysły przestudiować. Ja też mam nowego pomysła --- wpis edytowano 2025-02-15 13:04 --- |
2025-02-15 (13:31) fair_playData rejestracji: 2016-05-12 Ilość postów: 8971 | wpis nr 1 552 980 [ CZCIONKA MONOSPACE ] 777ch> Może spróbuj tak: Sub bitowo() For y = 2 To 5006 adres = Cells(y, 2) bajt = Int(adres / Cells(y, 3) = bajt bit = 1 + adres Mod 8 Cells(y, 4) = bit Cells(y, 13 - bit) = 1 Next End Sub ![]() |
2025-02-15 (13:43) 777chData rejestracji: 2005-11-07 Ilość postów: 23087 | wpis nr 1 552 981 [ CZCIONKA MONOSPACE ] fair_play Potestuj to sam ,w tablicy z adresami . Tak aby 8 bitów miało wynik dla 8 adresów odpowiedź w postaci 8 bitów jak poniżej bit1:= csn=adres =0000000001- sekwencja =true bit2:= csn=adres =1800000000- sekwencja =true bit3:= csn=adres =3600000000- sekwencja =true bit4:= csn=adres =5400000000- sekwencja =true bit5:= csn=adres =7200000000- sekwencja =false bit6:= csn=adres =9000000000- sekwencja =false bit7:= csn=adres =10800000000- sekwencja =false bit8:= csn=adres =12600000000- sekwencja =true |
2025-02-15 (13:58) fair_playData rejestracji: 2016-05-12 Ilość postów: 8971 | wpis nr 1 552 988 [ CZCIONKA MONOSPACE ] Próbujesz załatwić wiele spraw jednocześnie. Raz zależy Ci na czasie, innym razem na pamięci a jeszcze innym razem na brakach. Nie da się zoptymalizować wszystkiego. To co wstawiłem dotyczy wyliczenia ilości braków, bez zapisywania czegokolwiek w tabeli CSN. U mnie procedura oparta na tym pomyśle działa znakomicie i znacznie szybciej od adresowej, chociaż tabela "adresy jest wykorzystywana. |
2025-02-15 (14:37) fair_playData rejestracji: 2016-05-12 Ilość postów: 8971 | wpis nr 1 552 996 [ CZCIONKA MONOSPACE ] Dla 4 linii z wpisu 1 552 928 warr6 (na 7 nie starczyło pamięci) wyszła tak: ![]() |
2025-02-15 (15:08) 777chData rejestracji: 2005-11-07 Ilość postów: 23087 | wpis nr 1 553 003 [ CZCIONKA MONOSPACE ] ![]() ale na razie nie dodaje do paskala trochę wpierw poznam i potestuje tematykę bitów |
2025-02-15 (15:13) 777chData rejestracji: 2005-11-07 Ilość postów: 23087 | wpis nr 1 553 007 [ CZCIONKA MONOSPACE ] fair_play No to już w excelu .....zbliżasz się do czasu rand_war6 to sprawdzałem 02 04 07 11 18 20 27 28 29 34 36 39 40 45 51 52 61 62 63 65 72 79 92 93 99 01 04 07 09 19 25 28 30 35 36 43 51 53 54 63 69 72 77 79 81 85 86 88 94 99 01 08 11 14 19 21 25 26 28 33 40 42 47 49 51 58 61 66 67 71 73 74 83 90 92 02 03 10 13 24 37 39 43 55 59 61 63 64 65 67 68 69 71 73 75 76 77 79 85 89 ![]() a jak to u Ciebie czasowo wykonuje rand_warr[6] |
| | Dodaj wpis w tym temacie | Spis tematów | Wyniki lotto | Strona: 1 2 ... 539 540 541 ... 560 561 Wyślij wiadomość do admina |