Dodaj wpis w tym temacie
Spis tematów | Strona: 1 2 ... 13 14 15 16 17 18 19 Wyślij wiadomość do admina |
Przewiń wpisy ↓ | C++ od niechcenia |
2020-01-02 (14:43)![]() Data rejestracji: 2012-09-03 00:00:00 Ilość postów: 3147 ![]() | wpis nr 1 265 227 [ CZCIONKA MONOSPACE ] @777ch Piszesz waszym sloganem i nie bardzo rozumiem. Czy ty chcesz składać dziesiątki z piątek algorytmem zachłannym? Jeżeli tak, to chyba robi to ten program podany przez edi8: Numeri a Coprire - tak wynika z jego informacji. Zobacz: https://wheels.forumcommunity.net/?t=61497467 a program jest pod: https://wheels.forumcommunity.net/?t=59648557&st=45#entry432426415 nie testowałem bo znowu jakieś wirusy virustotal.com pokazuje. Swój wynik uzyskałem metodą półautomatyczną. Pokrycie liczyłem własnym programem, ale szóstki, które najlepiej kryją wybierałem ręcznie na podstawie wyniku pokrycia. Optymalizacja polegała na tym, że rozpatrywałem dwa poziomy w grafie wyboru (alg. zachłanny rozpatruje tylko bieżący poziom). Jeżeli w/w program nie potrafi składać wg twoich założeń, to algorytm jest bardzo prosty - czy go rozumiesz?, łatwo napisać program, ja w półautomacie liczyłem to ok. 40 min. (najwięcej czasu zajmowała optymalizacja) Algorytm zachłanny, może dać optymalny wynik, ale nie zawsze. Nie wiemy jaka jest najmniejsza ilość w naszym przypadku szóstek, (wiemy jaka jest największa z La Jolla Covering Repository 16,6,3). Jednak za pomocą w/w algorytmu można ustalić wyjściową do dalszych poszukiwań liczbę szóstek. Pozdrawiam @edi8 Greedy to nie jest nazwisko, tylko angielski przymiotnik (chciwy, zachłanny). |
2020-01-02 (14:52)![]() Data rejestracji: 2007-04-03 00:00:00 Ilość postów: 41774 ![]() | wpis nr 1 265 229 [ CZCIONKA MONOSPACE ] @Lottonauta> pisząc to co kwestionujesz, jedynie oparłem się o wpis autora programu NaC, czyli stef72 który napisał: "(NaC utilizza un algoritmo Greedy)." źródło: https://wheels.forumcommunity.net/?t=61497467#entry442238065 .................. Identyczną formę pisowni stosują także polskie źródła np. "Przypomnijmy działanie algorytmu Greedy" https://www.mimuw.edu.pl/~rytter/TEACHING/TEKSTY/kociumaka.pdf czy inne zagraniczne ale angielskojęzyczne (inne niż w/w włoskojęzyczny stef72) bo np. łatwo dostępne takie jak: "History of Greedy Algorithms" "What is the Greedy approach?" "Characteristics of the Greedy Approach" "Architecture of the Greedy approach" itd. itp. Zatem nie doszukuj się błędu tam, gdzie go nie ma, gdyż: a/ nigdy nie piszę z sufitu b/ rzeczownik własny nie musi pochodzić od nazwiska --- wpis edytowano 2020-01-02 15:08 --- |
2020-01-02 (15:17)![]() Data rejestracji: 2005-11-07 00:00:00 Ilość postów: 22655 ![]() | wpis nr 1 265 232 [ CZCIONKA MONOSPACE ] Lottonauta ja w półautomacie liczyłem to ok. 40 min. ----------------------------------------------- To mi wystarczy ,zapytałem z ciekawości , bo napisałeś, --> że to Twoja modyfikacja . Nie mam w zwyczaju ściągać żadnych programów, dlatego nie wiem ..... jak to i owo..... inni zrobili, -->pobieram jedynie ,jeśli jest pełny cod programu, o ile mnie zainteresuje temat........ pozdrawiam |
2020-01-02 (19:44)![]() Data rejestracji: 2012-09-03 00:00:00 Ilość postów: 3147 ![]() | wpis nr 1 265 269 [ CZCIONKA MONOSPACE ] Panie edi8 zechciej pan zrozumieć, że greedy to przymiotnik, a nie rzeczownik. Tego się nie odmienia na Greda jak żeś pan to zrobił. |
2020-01-02 (21:02)![]() Data rejestracji: 2007-04-03 00:00:00 Ilość postów: 41774 ![]() | wpis nr 1 265 290 [ CZCIONKA MONOSPACE ] Jak prawie zawsze mylisz się pan, panie Lottonauta - bowiem Greedy to także nazwisko, wcale nie tak rzadkie, np: https://www.whitepages.com/name/Raub-Greedy/Chicago-IL/158ukpx2 i wykazane poprzednio przeze mnie liczne występowanie pisowni w formie "algorytm Greedy" lub "History of Greedy Algorithms" czyli dużą literą, wcale nie wskazuje na to aby miał to być przymiotnik... ............... I jeżeli przywołujesz moją wypowiedź, to rób to do cholery rzetelnie a nie fałszuj jej, gdyż napisałem: "2020-01-02 (12:10) status edi8 Data rejestracji: 2007-04-03 Ilość postów: 28432 2623 wpis nr 1 265 191 Lottonauta> z tego co napisałeś wynika, iż dzięki swemu udoskonaleniu algorytmu Greeda " ........... a nie "Greda" - jak mi teraz usiłujesz przypisać... --- wpis edytowano 2020-01-02 21:17 --- |
2020-01-03 (13:57)![]() Data rejestracji: 2008-10-13 00:00:00 Ilość postów: 20531 ![]() | wpis nr 1 265 402 [ CZCIONKA MONOSPACE ] Witka, a może jakieś źródło w C++ dla pokrycia. --- wpis edytowano 2020-01-03 14:08 --- |
2020-01-03 (17:31)![]() Data rejestracji: 2019-07-29 00:00:00 Ilość postów: 99 ![]() | wpis nr 1 265 452 [ CZCIONKA MONOSPACE ] happy new year to all for those who understand in c ++ interesting code https://github.com/vanHavel/lotterywheels |
2020-01-03 (17:40)![]() Data rejestracji: 2019-07-29 00:00:00 Ilość postów: 99 ![]() | wpis nr 1 265 454 [ CZCIONKA MONOSPACE ] c++ Builder 30,6,4,4=2596 //--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- //#include <stdio.h> //#include <string.h> //#ifndef LIM6 #define LIM6 30 //#endif #define PRIVATE static #define PROC void #define ROLL(a0,a1,a2,a3,a4,a5,l)for (a5=5 ; a5 < l ; a5++)\ for (a4=4 ; a4 < a5 ; a4++)\ for (a3=3 ; a3 < a4 ; a3++) \ for (a2=2 ; a2 < a3 ; a2++) \ for (a1=1 ; a1 < a2 ; a1++) \ for (a0=0 ; a0 < a1 ; a0++) #define ROLL3(a0,a1,a2,a3,l)for (a3=3 ; a3 < l ; a3++) \ for (a2=2 ; a2 < a3 ; a2++) \ for (a1=1 ; a1 < a2 ; a1++) \ for (a0=0 ; a0 < a1 ; a0++) PRIVATE long TT3[LIM6][LIM6][LIM6][LIM6]; PRIVATE int UNSETED(b) int b[] ; { register int i,j,k,m ; int r = 0 ; ROLL3(i,j,k,m, 6) { r += (TT3[b[i]][b[j]][b[k]][b[m]] == 0) ; } return r ; } PRIVATE PROC SET(b) int b[] ; { register int i,j,k,m ; ROLL3(i,j,k,m, 6) { TT3[b[i]][b[j]][b[k]][b[m]] = 1 ; } } PRIVATE int b[12] = {0,1,2,3,4,5,6,7,8,9,10,11} ; void __fastcall TForm1::Button1Click(TObject *Sender) { Form1->Button1->Enabled = false; Form1->ListBox1->Clear(); int t, bc ,i; int cnt = 0 ; memset (TT3, 0, sizeof(TT3)) ; t = UNSETED(b) ; while (t > 0) { // fprintf(stderr,"We are at : %d\n",t) ; Form1->Label2->Caption = t; ROLL(b[0],b[1],b[2],b[3],b[4],b[5], LIM6) { bc = UNSETED(b) ; if (bc == t) { SET(b) ; Application->ProcessMessages(); cnt++ ; AnsiString str; Form1->Label1->Caption = cnt; str.sprintf("%02d %02d %02d %02d %02d %02d",b[0]+1, b[1]+1,b[2]+1,b[3]+1,b[4]+1,b[5]+1 ); Form1->ListBox1->Items->Add(str); // Form1->ListBox1->Items->SaveToFile("\loto.txt"); // Form1->ListBox1->Items->Add(("%02d %02d %02d %02d %02d %02d %02d %02d %02d %02d %02d",b[0]+1, b[1]+1, b[2]+1, b[3]+1, b[4]+1,b[5]+1,b[6]+1,b[7]+1,b[8]+1,b[9]+1,b[10]+1)); } } t-- ; } Form1->Button1->Enabled = true; } //--------------------------------------------------------------------------- void __fastcall TForm1::Button2Click(TObject *Sender) { Form1->Button1->Enabled = false; Form1->ListBox1->Items->SaveToFile("\loto.txt"); Form1->Button1->Enabled = true; } //--------------------------------------------------------------------------- |
2020-01-03 (18:00)![]() Data rejestracji: 2007-04-03 00:00:00 Ilość postów: 41774 ![]() | wpis nr 1 265 462 [ CZCIONKA MONOSPACE ] 30,6,4,4=2174 https://ljcr.dmgordon.org/cover/show_cover.php?v=30&k=6&t=4 |
2020-01-03 (18:10)![]() Data rejestracji: 2019-07-29 00:00:00 Ilość postów: 99 ![]() | wpis nr 1 265 465 [ CZCIONKA MONOSPACE ] edi8 I just want to show a simple code that generates with guarantee |
2020-01-03 (19:49)![]() Data rejestracji: 2008-10-13 00:00:00 Ilość postów: 20531 ![]() | wpis nr 1 265 484 [ CZCIONKA MONOSPACE ] Również życzymy wszystkiego najlepszego w nowym roku. Dziękuję za profesjonalny kod źródłowy. Pozdrawiam |
2020-01-04 (15:33)![]() Data rejestracji: 2008-10-13 00:00:00 Ilość postów: 20531 ![]() | wpis nr 1 265 645 [ CZCIONKA MONOSPACE ] Do mojego nowego sprzętu pasuje mi ino Dev-C++ TDM-GCC 4.9.2 64-bit Release I w tym będę grzebał hej. |
2020-01-18 (12:05)![]() Data rejestracji: 2012-09-03 00:00:00 Ilość postów: 3147 ![]() | wpis nr 1 268 550 [ CZCIONKA MONOSPACE ] sindbad, Czy udało ci się uruchomić ten kod, który zamieścił 4 wpisy wyżej BochiCintra? Czy komuś udało to się? Pozdrawiam |
2020-01-18 (12:47)![]() Data rejestracji: 2008-10-13 00:00:00 Ilość postów: 20531 ![]() | wpis nr 1 268 564 [ CZCIONKA MONOSPACE ] Lottonauta, Nie, ale widzę, że to prosty program. Pozdrawiam |
2020-01-18 (20:38)![]() Data rejestracji: 2008-10-13 00:00:00 Ilość postów: 20531 ![]() | wpis nr 1 268 657 [ CZCIONKA MONOSPACE ] Hej! Mała kosmetyka i ruszył na Dev-C++ TDM-GCC 4.9.2 64-bit Release #include <iostream> #include <stdio.h> #include <string.h> #include<conio.h> #ifndef LIM6 #define LIM6 30 #endif #define PRIVATE static #define PROC void #define ROLL(a0,a1,a2,a3,a4,a5,l)for (a5=5 ; a5 < l ; a5++)\ for (a4=4 ; a4 < a5 ; a4++)\ for (a3=3 ; a3 < a4 ; a3++) \ for (a2=2 ; a2 < a3 ; a2++) \ for (a1=1 ; a1 < a2 ; a1++) \ for (a0=0 ; a0 < a1 ; a0++) #define ROLL3(a0,a1,a2,a3,l)for (a3=3 ; a3 < l ; a3++) \ for (a2=2 ; a2 < a3 ; a2++) \ for (a1=1 ; a1 < a2 ; a1++) \ for (a0=0 ; a0 < a1 ; a0++) PRIVATE long TT3[LIM6][LIM6][LIM6][LIM6]; PRIVATE int UNSETED(int b[]) { register int i,j,k,m ; int r = 0 ; ROLL3(i,j,k,m, 6) { r += (TT3[b[i]][b[j]][b[k]][b[m]] == 0) ; } return r ; } PRIVATE PROC SET(int b[]) { register int i,j,k,m ; ROLL3(i,j,k,m, 6) { TT3[b[i]][b[j]][b[k]][b[m]] = 1 ; } } PRIVATE int b[12] = {0,1,2,3,4,5,6,7,8,9,10,11} ; using namespace std; int main() { cout<<"Start"<<endl<<endl; int t, bc ,i; int cnt = 0 ; memset (TT3, 0, sizeof(TT3)) ; t = UNSETED(b) ; while (t > 0) { ROLL(b[0],b[1],b[2],b[3],b[4],b[5], LIM6) { bc = UNSETED(b) ; if (bc == t) { SET(b) ; cnt++ ; cout<<cnt<<". "<<b[0]+1<<","<<b[1]+1<<","<<b[2]+1<<","<<b[3]+1<<","<<b[4]+1<<","<<b[5]+1<<endl; } } t-- ; } cout<<endl<<"(C 30,6,4,4) = "<<cnt<<endl<<endl; cout<<"Koniec"; getch(); return 0; } |
2020-01-18 (21:16)![]() Data rejestracji: 2008-10-13 00:00:00 Ilość postów: 20531 ![]() | wpis nr 1 268 664 [ CZCIONKA MONOSPACE ] Do pobrania program wykonywalny spakowany - pokrycia.rar https://megawrzuta.pl/download/1b7a94b75f2bdf29b087e6ad6ef03c94.html --- wpis edytowano 2020-01-18 21:16 --- |
2020-01-18 (23:14)![]() Data rejestracji: 2012-09-03 00:00:00 Ilość postów: 3147 ![]() | wpis nr 1 268 704 [ CZCIONKA MONOSPACE ] @sindbad, Już sobie poradziłem z przeniesieniem na C, ale dzięki za pomoc. Twój pokrycie.exe jakiś duży jest - 1.83MB, mój po gcc -O2 ma tylko 55 kB Pozdrawiam --- wpis edytowano 2020-01-18 23:17 --- |
2020-01-19 (10:49)![]() Data rejestracji: 2008-10-13 00:00:00 Ilość postów: 20531 ![]() | wpis nr 1 268 758 [ CZCIONKA MONOSPACE ] Witam. Lottonauta, W moim kodzie najcięższą biblioteką jest chyba iostream, ale nie przywiązuję wagi do tego ile kilo ma plik. Pozdrawiam |
2020-01-19 (16:21)![]() Data rejestracji: 2012-09-03 00:00:00 Ilość postów: 3147 ![]() | wpis nr 1 268 860 [ CZCIONKA MONOSPACE ] Może tak być z iostream. Kod zamieszczeny przez BochiCintra jest chyba częścią innego (gdzś go już widziałem i internecie) kodu. Czy wiesz jakiego? Pozdrawiam |
2020-01-19 (16:31)![]() Data rejestracji: 2008-10-13 00:00:00 Ilość postów: 20531 ![]() | wpis nr 1 268 861 [ CZCIONKA MONOSPACE ] Nie wiem. |
| Dodaj wpis w tym temacie | Spis tematów | Wyniki lotto | Strona: 1 2 ... 13 14 15 16 17 18 19 Wyślij wiadomość do admina |