Forum strony www.multipasko.pl [Regulamin]


Dodaj wpis w tym temacie
Spis tematów
Login:

Hasło:
Strona: 1 2 ... 539 540 541 ... 560 561
Wyślij wiadomość do admina

Przewiń wpisy ↓

moje ... oprogramowanie

2025-02-15 (00:20)

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

1386
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)

status MultiTest
Data rejestracji: 2020-08-05
Ilość postów: 6561

16235
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)

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

1386
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)

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

1386
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)

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

1386
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)

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

1386
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)

status MultiTest
Data rejestracji: 2020-08-05
Ilość postów: 6561

16235
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

zdjęcie

zdjęcie

zdjęcie

zdjęcie
2025-02-15 (02:32)

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

1386
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)

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

1386
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)

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

1386
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)

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

1386
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)

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

1386
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)

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

1386
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)

status MultiTest
Data rejestracji: 2020-08-05
Ilość postów: 6561

16235
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 na bazie tego co juz jest .

--- wpis edytowano 2025-02-15 13:04 ---

2025-02-15 (13:31)

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

14865
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


zdjęcie
2025-02-15 (13:43)

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

1386
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)

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

14865
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)

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

14865
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:

zdjęcie
2025-02-15 (15:08)

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

1386
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)

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

1386
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 lottoStrona: 1 2 ... 539 540 541 ... 560 561
Wyślij wiadomość do admina