Autor Téma: zimomriavky (husi kuze) z openAI  (Přečteno 4641 krát)

Offline František

  • Guru
  • *****
  • Příspěvků: 916
  • Karma: 8
    • Verze Delphi: comunity 10.4.2, D2007, D12, D2009
zimomriavky (husi kuze) z openAI
« kdy: 23-12-2022, 19:50:29 »
otazka na openAI

mam

  POpenTagsRec = ^TOpenTagsRec;

  TOpenTagsRec = record
    tag: string;
    tagStyle: string;
    AfterOpen: integer ;
   
    Prior: POpenTagsRec;
    Next: POpenTagsRec;
end;

vytvor mi metodu ktora vymaze prvok z retazoveho zoznamu podla POpenTagsRec


odpoved openAI
Tu je metóda, ktorá spĺňa požiadavky vašej otázky:

Kód: Delphi [Vybrat]
  1. procedure DeleteFromList(var List: POpenTagsRec; Item: POpenTagsRec);
  2. begin
  3.   if (List = Item) then
  4.   begin
  5.     List := Item^.Next;
  6.     if Assigned(List) then
  7.       List^.Prior := nil;
  8.   end
  9.   else if Assigned(Item^.Prior) then
  10.   begin
  11.     Item^.Prior^.Next := Item^.Next;
  12.     if Assigned(Item^.Next) then
  13.       Item^.Next^.Prior := Item^.Prior;
  14.   end;
  15.   Item^.Next := nil;
  16.   Item^.Prior := nil;
  17. end;

Názov tejto metódy môže byť napríklad "DeleteFromList". Metóda prijíma ako parameter ukazovateľ na začiatok reťazového zoznamu a ukazovateľ na prvok, ktorý sa má zoznamu odstrániť. Vo vnútri metódy sa skontroluje, či sa prvok nachádza na začiatku zoznamu, a v prípade potreby sa nastaví ukazovateľ List na nasledujúci prvok v zozname. Potom sa nastavia ukazovatele Prior a Next vymazaného prvku na nil, čím sa prvok odstráni z reťazového zoznamu.

doplnujuca otazka na openAI
a uvolnenie prvku z pamate?

odpoved openAI
Ak chcete uvoľniť prvok z pamäte po odstránení z reťazového zoznamu, môžete pridať nasledujúci kód do metódy DeleteFromList:

Copy code
Kód: Delphi [Vybrat]
  1. Dispose(Item);
Táto operácia použije funkciu Dispose na uvoľnenie pamäte, ktorú alokuje prvok typu POpenTagsRec. Po odstránení prvku z reťazového zoznamu a uvoľnení pamäte sa prvok stane neplatným a nemôže byť použitý.

Uvedená metóda je len jedným z možných spôsobov, ako odstrániť prvok z reťazového zoznamu a uvoľniť pamäť. Existujú aj iné spôsoby, ako to môže byť vyriešené, v závislosti od vašich konkrétnych potrieb a požiadaviek.

Offline František

  • Guru
  • *****
  • Příspěvků: 916
  • Karma: 8
    • Verze Delphi: comunity 10.4.2, D2007, D12, D2009
Re:zimomriavky (husi kuze) z openAI
« Odpověď #1 kdy: 23-12-2022, 20:01:26 »
a ak bude potrebne vymaza posledny prvok?

odpoved:
Ak chcete odstrániť posledný prvok z reťazového zoznamu, môžete použiť nasledujúcu verziu metódy DeleteFromList:

Kód: Delphi [Vybrat]
  1. procedure DeleteFromList(var List: POpenTagsRec; Item: POpenTagsRec);
  2. begin
  3.   if (List = Item) then
  4.   begin
  5.     List := Item^.Next;
  6.     if Assigned(List) then
  7.       List^.Prior := nil;
  8.   end
  9.   else if Assigned(Item^.Prior) then
  10.   begin
  11.     Item^.Prior^.Next := Item^.Next;
  12.     if Assigned(Item^.Next) then
  13.       Item^.Next^.Prior := Item^.Prior;
  14.   end
  15.   else if Assigned(Item^.Next) then
  16.   begin
  17.     Item^.Next^.Prior := nil;
  18.   end;
  19.   Item^.Next := nil;
  20.   Item^.Prior := nil;
  21.   Dispose(Item);
  22. end;
Táto verzia metódy pridáva kontrolu, či sa prvok nachádza na konci zoznamu. V prípade, že sa prvok nachádza na konci zoznamu a má nasledujúci prvok, nastaví sa ukazovateľ Prior nasledujúceho prvku na nil.

Offline František

  • Guru
  • *****
  • Příspěvků: 916
  • Karma: 8
    • Verze Delphi: comunity 10.4.2, D2007, D12, D2009
Re:zimomriavky (husi kuze) z openAI
« Odpověď #2 kdy: 23-12-2022, 20:06:14 »
otazka:
dopn vstupne aj vystupne parametre o prvy a posledny prvok listu

odpoved:
Tu je upravená verzia metódy DeleteFromList, ktorá obsahuje vstupné a výstupné parametre pre prvý a posledný prvok reťazového zoznamu:

Kód: Delphi [Vybrat]
  1. procedure DeleteFromList(var List: POpenTagsRec; var First: POpenTagsRec;
  2.   var Last: POpenTagsRec; Item: POpenTagsRec);
  3. begin
  4.   if (List = Item) then
  5.   begin
  6.     List := Item^.Next;
  7.     if Assigned(List) then
  8.       List^.Prior := nil;
  9.   end
  10.   else if Assigned(Item^.Prior) then
  11.   begin
  12.     Item^.Prior^.Next := Item^.Next;
  13.     if Assigned(Item^.Next) then
  14.       Item^.Next^.Prior := Item^.Prior;
  15.   end
  16.   else if Assigned(Item^.Next) then
  17.   begin
  18.     Item^.Next^.Prior := nil;
  19.   end;
  20.   Item^.Next := nil;
  21.   Item^.Prior := nil;
  22.  
  23.   if (Item = First) then
  24.     First := Item^.Next;
  25.   if (Item = Last) then
  26.     Last := Item^.Prior;
  27.   Dispose(Item);
  28. end;
Táto verzia metódy pridáva vstupné a výstupné parametre pre ukazovatele na prvý a posledný prvok reťazového zoznamu. V prípade, že sa odstraňovaný prvok nachádza na začiatku alebo konci zoznamu, nastaví sa odpovedajúci ukazovateľ na nasledujúci alebo predchádzajúci prvok v zozname.

Offline František

  • Guru
  • *****
  • Příspěvků: 916
  • Karma: 8
    • Verze Delphi: comunity 10.4.2, D2007, D12, D2009
Re:zimomriavky (husi kuze) z openAI
« Odpověď #3 kdy: 23-12-2022, 20:11:21 »
sme v case bezdrotovej telegrafie s AI

Offline Radek Červinka

  • Administrátoři
  • Padawan
  • *****
  • Příspěvků: 3544
  • Karma: 112
    • Verze Delphi: D2007, DXE + 2 poslední
    • O Delphi v češtině
Re:zimomriavky (husi kuze) z openAI
« Odpověď #4 kdy: 24-12-2022, 11:48:23 »
já bych to nepřeceňoval,
a) je to v podstatě velmi znamá úloha
b) hodně lidí reportuje špatné výsledky
c) SO zakázal přijímat výsledky generované AI, protože obsahují kolikrát špatné řešení.

Na druhou stranu jsem viděl jak někdo požádal o funkci a pak požádal o její ASM verzi a následně požádal o optimalizaci. Bylo to zajímavé.
Embarcadero MVP - Czech republic

Offline František

  • Guru
  • *****
  • Příspěvků: 916
  • Karma: 8
    • Verze Delphi: comunity 10.4.2, D2007, D12, D2009
Re:zimomriavky (husi kuze) z openAI
« Odpověď #5 kdy: 25-12-2022, 17:41:26 »
pravdu povediac, mna viac zaujalo to pochopenie co chcem, a aj vysvetlujuca odpoved ... myslim ze ako "pisalek" je to parada, je to vyborne na hromadne upravy kodu, kde sa clovek lahko pomyli, a samozrejem aj na tu tvorbu, a to nie len kodu .... napisal mi aj rozpravku :), aj
Kód: Delphi [Vybrat]
  1. Vianočné haiku od openAI:
  2.  
  3. Snehobiela zima,
  4. Vianoce plné lásky a radosti,
  5. srdce sa rozvíja.

Offline vandrovnik

  • Padawan
  • ******
  • Příspěvků: 1587
  • Karma: 52
    • Verze Delphi: 11.3
Re:zimomriavky (husi kuze) z openAI
« Odpověď #6 kdy: 25-12-2022, 19:17:42 »
Excellent
Rated 1 time
pravdu povediac, mna viac zaujalo to pochopenie co chcem, a aj vysvetlujuca odpoved ... myslim ze ako "pisalek" je to parada, je to vyborne na hromadne upravy kodu, kde sa clovek lahko pomyli, a samozrejem aj na tu tvorbu, a to nie len kodu ....

Jenže jestli to (zatím?) je schopné vyprodukovat i chybný kód, tak mi připadá ve většině případů obtížnější to po někom nebo něčem zkontrolovat, než to napsat rovnou sám...

Offline karkojk

  • Mladík
  • **
  • Příspěvků: 55
  • Karma: 0
    • Verze Delphi: RAD Studio X5
Re:zimomriavky (husi kuze) z openAI
« Odpověď #7 kdy: 26-12-2022, 16:29:18 »
Taky jsem na to koukal, jak už komunikuje v češtině a dává to smysl, proto sdílím tu „husí kůži".
Nepřeceňuji to, grafiku raději budu dělat sám, ale není špatný tam nahodit svůj „problém" a pak po nasměrování ověřit „logiku" věci.
Taky bych si nechal navrhnout jednoduchou databázi, u které už jsem zapomněl „jak na to" a nemůžu se dokopat to hledat/zkoušet, smutné ;-).
Programování pro radost, prý to bystří mysl ;-)

Offline František

  • Guru
  • *****
  • Příspěvků: 916
  • Karma: 8
    • Verze Delphi: comunity 10.4.2, D2007, D12, D2009
Re:zimomriavky (husi kuze) z openAI
« Odpověď #8 kdy: 29-12-2022, 17:31:34 »
este by som doplnil, ze podla toho ako usmevne sklonuje slovencinu, (mimochodom podobne ako moj 8 rocny syn), nepozna vynimky, ale sklonuje to tak, ze by mohol zbavit nie len slovecinu vynimiek :)
ale toto som xcel, skonuje to ako male dieta, co aj v skutocnosti je, a predpokladam ze komunikaciou s ludmi sa vyvija a uci dalej ...
nie je to vsevedko, ale skor ucitel... aj ten sa pomyli

Offline pf1957

  • Padawan
  • ******
  • Příspěvků: 3531
  • Karma: 139
    • Verze Delphi: D2007, XE3, DX10
Re:zimomriavky (husi kuze) z openAI
« Odpověď #9 kdy: 30-12-2022, 14:15:50 »
Jenže jestli to (zatím?) je schopné vyprodukovat i chybný kód
Urcite je. Ja to testoval v oblasti vyzivy drubeze a neco odpovedelo skutecne dobre, ze si to dovedu predstavit jako dalsi uroven ve vyhledavani, kdy Google jen vrati nejake predtrideny seznam odbornych praci + balast a clovek musel mit znalosti a/nebo se tim procist, aby se k takove odpovedi dostal. To bylo velmi pusobive.

Ovsem na druhou stranu k podobne problematice odpovedel nesmysl na urovni babickovskych idiocii.

Kdyz jsem odpoved odsouhlasil, tak chteli po me odpoved, kterou povazuju za optimalni, u nesouhlasu chteli vedet co se mi na tom nelibi a proc. Tak jsem ten stroj nakrmil (schvalne cesky, kdyz jsem to testoval cesky) a jsem zvedavy, jestli nektere ty odpovedi opravi.

Offline Daniel_Andrascik

  • Guru
  • *****
  • Příspěvků: 587
  • Karma: 20
    • Verze Delphi: D2007, D10.4
Re:zimomriavky (husi kuze) z openAI
« Odpověď #10 kdy: 02-01-2023, 13:10:03 »
Dovolim si citovat Martin Černohorskeho z FB skupiny o arduine: tu je povodny odkaz: https://www.facebook.com/groups/arduinoczsk/posts/1504727800011582/

Citace
Pro zajímavost: ChatGPT a Arduino

Tak jsem se rozhodl zkusit, co dokáže ChatGPT a rozhodl jsem se s ní zkusit následující projekt: (bez toho, aniž bych sám napsal řádku kódu)
zadání:

1. použij desku Wemos D1 s wifi a senzor BME280
2. odesílej data requestem na php skript (který napiš)
3. php skript zapíše data do MySQL databáze
4. na mém webu potom vygeneruj graf, který se bude aktualizovat v reálém čase (jazyk si zvol)

Jsem opravdu velmi překvapen, jelikož si to se vším poradilo naskrz všemi jazyky: tj. Arduino IDE, PHP, JavaScript (interaktivní graf) a SQL (databáze insertion)

Výsledek zde: https://yonedalemma.net/ (graf na mé main page, který se aktualizuje každou minutku)

Poznámky: bez ChatGPT bych to nenapsal, neumím ani špetku Javy. Opravdu jsem nebyl nucen napsat ani řádku kodu a všechny skripty vznikly copy+paste primo z okna ChatGPT, když jsem potřeboval změnu, vložil jsem stávající kód a požádal AI o opravu.  S ChatGPT je ale třeba mluvit jako s člověkem, který zapomíná, ale je opravdu skvělé v debugu.
Takže často se stalo, že kód jsem nahrál a nefungoval, ale! Potom jsem zkrátka popsal chybu, nebo zkopíroval ChatGPT chybovou hlášku a byla schopná korekce a problém se mnou vyřešit.

Doporučuji, fakt paráda a naučilo mě to spoustu nového.

Projekt, který bych dělal dlouhé dny jsem s ChatGPT dokončil za jeden večer a bez psaní kódu.

Osobne si myslim ze ChatGPT je skor len nova generacia vyhladavaca. Bude to asi neuronka ktora sa neprestajne krmi datami z internetu a uz je dost nakrmena na to aby dokazala vyriesit ulohu ako je ta od Martina Černohorskeho. Ale samozrejme internet je aj plny blbosti takze moze kludne poradit aj zle. Otazka je ci sa niekedy aj nauci ze to je naozaj zle, podobne ako to tu opisoval PF.

V kazdom pripade je zaujimava ta Martinova skusenost ze za jeden vecer urobil to co by robil mozno niekolko dni. Na druhu stranu, je otazne nakolko je ten kod optimalizovany. Keby tych merani chcel urobit stovky a nie jedno, tak kto vie ci by mu to cele neklaklo.

Cize si myslim ze na optimalizacie stale potrebujeme serioznych programatorov.

Som ale zvedavy ci to v buducnosti dokaze naprogramovat cely system ako napriklad e-healt a aj ho vyoptimalizovat. To potom asi pojdeme past ovecky

Offline František

  • Guru
  • *****
  • Příspěvků: 916
  • Karma: 8
    • Verze Delphi: comunity 10.4.2, D2007, D12, D2009
Re:zimomriavky (husi kuze) z openAI
« Odpověď #11 kdy: 03-01-2023, 21:37:48 »
presne aj ja mam tu istu skusenost ako Martin Černohorsky
tiez som ziadal a riesil a opravoval a reportoval az nakoniec som dostal za par hodin to, co by som asi sam riesil minimalne tyzden

ale dnes som dostal aj nezmyselnu (alebo usmevnu) odpoved (Debian):
Ak ani to nepomôže, môže byť potrebné skontrolovať, či sú v systéme nainštalované všetky potrebné balíčky pre prácu s nástrojom apt.
Môžete to urobiť pomocou príkazu sudo apt install apt.
« Poslední změna: 03-01-2023, 21:44:00 od František »

Offline Jan Fiala

  • Hrdina
  • ****
  • Příspěvků: 449
  • Karma: 6
    • Verze Delphi: 10.4.1
    • PSPad editor
Re:zimomriavky (husi kuze) z openAI
« Odpověď #12 kdy: 04-01-2023, 10:51:04 »
Osobne si myslim ze ChatGPT je skor len nova generacia vyhladavaca. Bude to asi neuronka ktora sa neprestajne krmi datami z internetu a uz je dost nakrmena na to aby dokazala vyriesit ulohu ako je ta od Martina Černohorskeho. Ale samozrejme internet je aj plny blbosti takze moze kludne poradit aj zle. Otazka je ci sa niekedy aj nauci ze to je naozaj zle, podobne ako to tu opisoval PF.

V kazdom pripade je zaujimava ta Martinova skusenost ze za jeden vecer urobil to co by robil mozno niekolko dni. Na druhu stranu, je otazne nakolko je ten kod optimalizovany. Keby tych merani chcel urobit stovky a nie jedno, tak kto vie ci by mu to cele neklaklo.

Cize si myslim ze na optimalizacie stale potrebujeme serioznych programatorov.

Som ale zvedavy ci to v buducnosti dokaze naprogramovat cely system ako napriklad e-healt a aj ho vyoptimalizovat. To potom asi pojdeme past ovecky

Kdyby nebylo řešení přes ChatGPT, musel bys hledat v klasickém vyhledávači a kopírovat kód odsud. Když sleduješ současné projekty (hlavně z indických farem), tak tam se na optimalizaci už moc nehraje. Napsat to rychle, aby to fungovalo je dnes hlavní. Na optimalizaci na rychlost a velikost už se moc nehraje.

Zatím bude člověk minimálně potřebný pro analýzu problému a návrh řešení - to je ještě před vlastním programováním, ale i to se do budoucna může změnit.

Offline pf1957

  • Padawan
  • ******
  • Příspěvků: 3531
  • Karma: 139
    • Verze Delphi: D2007, XE3, DX10
Re:zimomriavky (husi kuze) z openAI
« Odpověď #13 kdy: 04-01-2023, 13:53:46 »
Když sleduješ současné projekty (hlavně z indických farem), tak tam se na optimalizaci už moc nehraje. Napsat to rychle, aby to fungovalo je dnes hlavní. Na optimalizaci na rychlost a velikost už se moc nehraje.

Zatím bude člověk minimálně potřebný pro analýzu problému a návrh řešení - to je ještě před vlastním programováním, ale i to se do budoucna může změnit.

Clovece, my se skoro pred 30 lety zabyvali dost intenzivne dial-up modemy a uz v tech 90. letech jsme narazili na SW cina/taiwan provenience, kde analyzu omezili jen na skutecne nezbytne minimalni spolecne rozhrani a driver pro kazdy typ modemu nekdo vyprasil nezavisle na vsech ostatnich driverech v podstate od nuly, takze nektere jim fungovaly, nektere vubec... Velmi neinzenyrske, ale ve svete s dostatkem mene kvalifikovane pracovni sily nic neobvykleho. Zazil jsem, ze nikdo neresil znalosti a praxi: proste meli volneho cloveka, ktery to sice nikdy nedelal, tak mu priradili ukol a on se snazil nejak to vyprasit, pak ho klidne vzali a poslali prasit neco uplne jineho. Docela bes...

Na druhou stranu si od nas draho kupovali licenci :-)

Offline Radek Červinka

  • Administrátoři
  • Padawan
  • *****
  • Příspěvků: 3544
  • Karma: 112
    • Verze Delphi: D2007, DXE + 2 poslední
    • O Delphi v češtině
Re:zimomriavky (husi kuze) z openAI
« Odpověď #14 kdy: 04-01-2023, 14:08:32 »
Excellent
Rated 2 times
Zatím bude člověk minimálně potřebný pro analýzu problému a návrh řešení - to je ještě před vlastním programováním, ale i to se do budoucna může změnit.

K tomu bych jen dodal (z roku 2017) - https://pbs.twimg.com/media/DEYUKDyXoAAvaop?format=jpg
Embarcadero MVP - Czech republic

Offline Daniel_Andrascik

  • Guru
  • *****
  • Příspěvků: 587
  • Karma: 20
    • Verze Delphi: D2007, D10.4
Re:zimomriavky (husi kuze) z openAI
« Odpověď #15 kdy: 04-01-2023, 20:56:01 »

Kdyby nebylo řešení přes ChatGPT, musel bys hledat v klasickém vyhledávači a kopírovat kód odsud. Když sleduješ současné projekty (hlavně z indických farem), tak tam se na optimalizaci už moc nehraje. Napsat to rychle, aby to fungovalo je dnes hlavní. Na optimalizaci na rychlost a velikost už se moc nehraje.


Na tom nieco bude, je pravda ze sa stretavam priam s tragickymi "tlstymi" apkami pre win ktore nie su tak masovo sirene ako napriklad kancelarske baliky a je to priam tragedia. Dam rozbalit combobox s 12 timi polozkami a trva to i 3 sekundy kym sa to rozbali a data taha z databazy no max par stovak riadkov ak vobec  ??? 

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 7426
  • Karma: 44
    • Verze Delphi: W11 + D11.3.1
Re:zimomriavky (husi kuze) z openAI
« Odpověď #16 kdy: 05-01-2023, 09:39:48 »
Pre zaujímavosť. Teraz sa objavilo https://en.delphipraxis.net/topic/7951-ann-chatgpt-banned-on-stack-overflow/
Citace
Mesto New York zakázalo používanie školských zariadení
  Citovať
„Vzhľadom na obavy z negatívnych dopadov na učenie študentov a obavy týkajúce sa bezpečnosti a presnosti obsahu je prístup k ChatGPT obmedzený na siete a zariadenia verejných škôl v New Yorku,“ povedala hovorkyňa ministerstva školstva Jenna Lyle. „Aj keď tento nástroj môže byť schopný poskytnúť rýchle a jednoduché odpovede na otázky, nevybuduje zručnosti kritického myslenia a riešenia problémov, ktoré sú nevyhnutné pre akademický a celoživotný úspech.“
Win11 64b, Delphi 12.2, FireBird 4.01
Expert na kladenie nejasne formulovaných otázok.

Offline František

  • Guru
  • *****
  • Příspěvků: 916
  • Karma: 8
    • Verze Delphi: comunity 10.4.2, D2007, D12, D2009
Re:zimomriavky (husi kuze) z openAI
« Odpověď #17 kdy: 05-01-2023, 23:40:14 »
plati univerzalne

neexistuje zla odpoved, iba zla otazka

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 7426
  • Karma: 44
    • Verze Delphi: W11 + D11.3.1
Re:zimomriavky (husi kuze) z openAI
« Odpověď #18 kdy: 06-01-2023, 09:19:03 »
plati univerzalne

neexistuje zla odpoved, iba zla otazka
Tak potom prečo som v škole dostával päťky?
Win11 64b, Delphi 12.2, FireBird 4.01
Expert na kladenie nejasne formulovaných otázok.

Offline Radek Červinka

  • Administrátoři
  • Padawan
  • *****
  • Příspěvků: 3544
  • Karma: 112
    • Verze Delphi: D2007, DXE + 2 poslední
    • O Delphi v češtině
Re:zimomriavky (husi kuze) z openAI
« Odpověď #19 kdy: 06-01-2023, 09:58:59 »
plati univerzalne

neexistuje zla odpoved, iba zla otazka
Tak potom prečo som v škole dostával päťky?

Já si myslím, že ten zákaz je velmi opodstatněný. Zkoušel jsem "Prosím napiš zápis do čtenářského deníku o knize Robinson Crusoe na jednu stranu A4." a pak "Prosím uprav zápis ve stylu žáka základní školy." a úplně ten zákaz chápu.
Embarcadero MVP - Czech republic

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 7426
  • Karma: 44
    • Verze Delphi: W11 + D11.3.1
Re:zimomriavky (husi kuze) z openAI
« Odpověď #20 kdy: 06-01-2023, 10:38:51 »
Aj tu o tom debatujú https://en.delphipraxis.net/topic/8099-is-asked-chatgpt-what-is-internet-component-suite-for-delphi/
S tým zákazom plne súhlasím.
Ak sa pýtajúci vyzná v problematike, tak mu ChatGPT môže pomôcť. Viď aj František. V takých prípadoch to je prínos. V ostatných to narobí viac zla ako dobra.
Win11 64b, Delphi 12.2, FireBird 4.01
Expert na kladenie nejasne formulovaných otázok.

Offline Jan Fiala

  • Hrdina
  • ****
  • Příspěvků: 449
  • Karma: 6
    • Verze Delphi: 10.4.1
    • PSPad editor
Re:zimomriavky (husi kuze) z openAI
« Odpověď #21 kdy: 06-01-2023, 11:03:49 »
V ostatných to narobí viac zla ako dobra.

To, že AI je schopná ti odpovědět je zlo? Není. Je to pokrok. Jen se tomu musí přizpůsobit školství. Učitelé musí vylézt ze své lenivé ulity, kdy zadají úkol, dostanou zpět papír a na základě toho hodnotí.
Na škole v matice při zkoušce test - 4 příklady, mohl jsi mít A4 a na ní napsané co chceš. Po testu si profesor všechny postupně vzal a nechal si vysvětlit postup výpočtu. Takto jednoduše eliminoval ty, kteří tomu rozumí od těch, kteří tupě opsali. A přesně takto se to dá aplikovat při jakékoliv výuce. Učitel není od toho, aby tě naučil se biflovat, ale aby tě naučil porozumnět látce.

Offline František

  • Guru
  • *****
  • Příspěvků: 916
  • Karma: 8
    • Verze Delphi: comunity 10.4.2, D2007, D12, D2009
Re:zimomriavky (husi kuze) z openAI
« Odpověď #22 kdy: 06-01-2023, 11:28:24 »
plati univerzalne

neexistuje zla odpoved, iba zla otazka
myslel som to na tie zle/nespravne/zavadzajuce/vymyslene odpovede od openAI
lebo ked som presnejsie specifikoval otazku, dostaval som "spravnejsie" odpovede

Offline Roman K.

  • Nováček
  • *
  • Příspěvků: 29
  • Karma: 2
    • Verze Delphi: D4,D5,D7,XE5,Tokyo
Re:zimomriavky (husi kuze) z openAI
« Odpověď #23 kdy: 01-05-2023, 14:33:09 »
Zkusil jsem si nainstalovat openAPI ChatGPT wizard v Delphi 11.3 přes GetIt, ale nic to nedělá :-)
Zadám otázku, stisknu tlačítko, gauga dole se pár vteřin zmítá, pak to přestane a odpověď NIKDE.
Ve videonávodu  jim to skvěle funguje, ale já nevím co dělám blbě...

Offline JaroB

  • Guru
  • *****
  • Příspěvků: 1144
  • Karma: 29
    • Verze Delphi: XE8, Sydney
Re:zimomriavky (husi kuze) z openAI
« Odpověď #24 kdy: 02-05-2023, 08:20:35 »
Myslím, že mám všechno správně nastaveno vč. tokenu, ale dostávám v odpovědi pouze "HTTP/1.1 429 Too Many Requests"

Offline Jan Fiala

  • Hrdina
  • ****
  • Příspěvků: 449
  • Karma: 6
    • Verze Delphi: 10.4.1
    • PSPad editor
Re:zimomriavky (husi kuze) z openAI
« Odpověď #25 kdy: 02-05-2023, 15:22:41 »
Myslím, že mám všechno správně nastaveno vč. tokenu, ale dostávám v odpovědi pouze "HTTP/1.1 429 Too Many Requests"

Tahle odpoved je dana tuposti autora kodu. Chat GPT v tomto pripade vraci hlaseni, ze tu vyprsela trial verze (mesic) a musis upgradovat plan.
Zaloz si dalsi ucet, vloz novy API key a muzes testovat. Nebo zaplat $5, to ti vydrzi na pul roku

Offline JaroB

  • Guru
  • *****
  • Příspěvků: 1144
  • Karma: 29
    • Verze Delphi: XE8, Sydney
Re:zimomriavky (husi kuze) z openAI
« Odpověď #26 kdy: 03-05-2023, 06:05:50 »
Děkuji.
Ale jak mohu mít vypršený trial, když jsem tohle všechno udělal v jeden ten samý den a tu hlášku dostal hned při první zkoušce ?

Offline Jan Fiala

  • Hrdina
  • ****
  • Příspěvků: 449
  • Karma: 6
    • Verze Delphi: 10.4.1
    • PSPad editor
Re:zimomriavky (husi kuze) z openAI
« Odpověď #27 kdy: 03-05-2023, 06:47:56 »
Me to vracelo 495, protoze autor testuje navratovou hodnotu z HTTPRequest 200 jako v poradku, jinak vraci pouze Result.
Ale ChatGPT vraci i v ostatnich pripadech (pokud to neni chyba serveru) JSON s Error.Message a popisem, co je spatne.
Pro testovaci ucely jsem si za $5 koupil ucet a pro testovani to vystaci tak na pul roku.

Ale treba maji API vytizene nebo se snazi vytahnout z lidi penize.

Offline JaroB

  • Guru
  • *****
  • Příspěvků: 1144
  • Karma: 29
    • Verze Delphi: XE8, Sydney
Re:zimomriavky (husi kuze) z openAI
« Odpověď #28 kdy: 03-05-2023, 06:50:40 »
Taky mi to tak přijde

Offline pf1957

  • Padawan
  • ******
  • Příspěvků: 3531
  • Karma: 139
    • Verze Delphi: D2007, XE3, DX10
Re:zimomriavky (husi kuze) z openAI
« Odpověď #29 kdy: 03-05-2023, 08:55:47 »
To je throttling trafficu, viz napr. Rate limits a objevuje se to, i kdyz na to lezes browserem.

Offline raul

  • Hrdina
  • ****
  • Příspěvků: 468
  • Karma: 15
    • Verze Delphi: FPC :D
Re:zimomriavky (husi kuze) z openAI
« Odpověď #30 kdy: 04-05-2023, 08:39:41 »
Good
Rated 1 time
Heh, jsem rád, že někteří mí učitelé netrvali na tom, abych ukázal postup jak se učil. Ten jsem nepochopil dodnes. Ale správný výsledek jsem měl rychleji než kolikrát i oni. ChatGPT atd tu prostě je, a jak to dopadne se dá těžko předvídat. Dovedu si představit popisek zboží, o kterém nic neví (zřejmě se jeden český výrobce přenesl v čase a takový popisek už má pár let, v popisku info, v manuálu ani ťuk a prodejce taky neodpověděl stylem: jasně to je tady a tady), takže se popisky a návody stanou líbivější, méně přesné a posléze tedy možná i méně čtené. No a tady si říkám, proč je tam vlastně mít vůbec, stačila by tabulka parametrů a bude výstižnější - samozřejmě pro jistou zákaznickou skupinu nebude tak přitažlivá. Něco podobného zažívám občas u některých copywriterů - napíše o čemkoliv, no ale musí přece mít dost podkladů - což někteří nevyžadují a prý si poradí. Budem teď zkoušet nechat si kreslit určité ilustrace, tak jsem zvědav, až to kolega naštuduje a něco z toho vyleze. Já ji zatím použil pouze jako poradce u projektu napsaného v php, kde potřebujem pár věcí jemně změnit a .. byť dává kolikrát nesmysl, po upřesnění se opraví. Je legrační, že - poslední zpráva se mi nezobrazuje celá, můžeš ji zopakovat - napíše něco úplně jiného a někdy i mírně k jinému dotazu.

Btw nedávno jsem si pro ujištění nechal přeložit kousek anglického textu (psaného neangličanem) od deepl a velice divně mi tam přebývala věta, kterou jsem v originále vůbec nenašel, bavili se tam o podobných věcech, ale v tom místě +- 10 řádků nic takového nebylo.

Tak či tak, přijde změna. Pauznout to? Nesmysl, pauzne to někdo, druhej ne. Přizpůsobit se.
Lazarus 1.6.3:), FPC, Intel/Arm, Windows/Linux, (občas Delphi)

Offline JaroB

  • Guru
  • *****
  • Příspěvků: 1144
  • Karma: 29
    • Verze Delphi: XE8, Sydney
Re:zimomriavky (husi kuze) z openAI
« Odpověď #31 kdy: 04-05-2023, 08:48:21 »
Mně ChatGPT pomáhá při analýze asemblerovských rutin. Je to fajn, ale na živý kód ho nepouštím, protože mi dost lže, především v konkrétních dotazech při konverzích, stále musí být každá odpověď řádně ověřována :( To je trochu minus.
Super bude, až dokáže na vstupu pobrat víc dat... :o

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 7426
  • Karma: 44
    • Verze Delphi: W11 + D11.3.1
Re:zimomriavky (husi kuze) z openAI
« Odpověď #32 kdy: 25-05-2023, 09:57:06 »
Tak som to skúsil. Požiadal som o návrhy GUI a algoritmu riešenia súťaže družstiev (futbal) v dvoch fázach
1) Každý s každým
2) KO systém
Buď je to preňho zložité, alebo sa neviem správne opýtať. Asi to bude oboje.
Nakoniec som mu popísal GUI.
Odpovede sú veľmi všeobecné a všetko to už viem. Veľmi sa nečudujem, keďže som chcel návrhy, kostru riešení.
Tak nič. Idem si to vyriešiť sám.
.
Prikladám moju konverzáciu.
Ak má niekto nápad ako z neho vytiahnuť viac, tak sem s tým.

« Poslední změna: 25-05-2023, 10:04:32 od Stanislav Hruška »
Win11 64b, Delphi 12.2, FireBird 4.01
Expert na kladenie nejasne formulovaných otázok.

Offline Jan Fiala

  • Hrdina
  • ****
  • Příspěvků: 449
  • Karma: 6
    • Verze Delphi: 10.4.1
    • PSPad editor
Re:zimomriavky (husi kuze) z openAI
« Odpověď #33 kdy: 25-05-2023, 13:31:05 »
Excellent
Rated 1 time
A čekal jsi co? Formuláře s komponentami?
Ptal jsi se jej obecně, tak ti obecně odpovídal.
Pokud chceš, aby ti vrátil kód, musíš mu napsat, že chceš kód.

Ber to tak, že ChatGPT je chlap, vytvořený jinými chlapy. Udělá, co mu řekneš. Kdyby to byla ženská, bude si domýšlet, co jsi tím asi mohl myslet a výsledkem by byly mnohem větší kraviny než teď   ;D

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 7426
  • Karma: 44
    • Verze Delphi: W11 + D11.3.1
Re:zimomriavky (husi kuze) z openAI
« Odpověď #34 kdy: 25-05-2023, 14:56:29 »
Veď som písal, že som sa veľmi nečudoval. Som si tých vecí vedomý.
V mojom prípade sú odpovede správne.

Trochu som čakal, že by sa tam mohlo objaviť niečo zaujímavé.
Mám obavu, že nedokážem správne naformulovať otázku pre kód. Čoho by sa vlastne mal chytiť?
Má niekto nejaký návrh na vyskúšanie?
Určite budem chcieť nejakú triedu + zoznam panelov pre prvú etapu (každý s každým).
Win11 64b, Delphi 12.2, FireBird 4.01
Expert na kladenie nejasne formulovaných otázok.

Offline František

  • Guru
  • *****
  • Příspěvků: 916
  • Karma: 8
    • Verze Delphi: comunity 10.4.2, D2007, D12, D2009
Re:zimomriavky (husi kuze) z openAI
« Odpověď #35 kdy: 27-05-2023, 09:19:16 »
upravil som tvoju prvu cast dotazu a toto vzniklo
Citace
Navrhni mi databazu firebird pre súťaž družstiev.
Súťaž prebieha v kolách.
Prvý stupeň: súťaž v skupinách. Hrá každé družstvo s každým
Druhý stupeň: vylučovací (KO). Hrajú dve družstvá a víťaz postupuje
A) Počet kôl pre jednotlivé súťaže sa mení dynamicy podľa súťaže.
B) Požadujem riešenie vždy len pre jedinú súťaž.
C) Víťazov určí užívateľ aplikácie.


ChatGPT
Na základe vašich požiadaviek navrhujem nasledujúci model databázy pre súťaž družstiev v systéme Firebird:

Tabuľka "Druzstva":

id_druzstva (unikátny identifikátor družstva)
nazov_druzstva (názov družstva)
Tabuľka "Sutaze":

id_sutaze (unikátny identifikátor súťaže)
nazov_sutaze (názov súťaže)
typ_sutaze (typ súťaže, napríklad "Prvý stupeň" alebo "Druhý stupeň")
Tabuľka "Kola":

id_kola (unikátny identifikátor kola)
id_sutaze (referencia na tabuľku "Sutaze")
cislo_kola (poradové číslo kola)
Tabuľka "Zapas":

id_zapasu (unikátny identifikátor zápasu)
id_kola (referencia na tabuľku "Kola")
id_domace_druzstvo (referencia na tabuľku "Druzstva")
id_hoste_druzstvo (referencia na tabuľku "Druzstva")
vysledok_domaci (výsledok domáceho družstva)
vysledok_hostia (výsledok hosťujúceho družstva)
Týmto modelom dokážeme zaznamenať informácie o družstvách, súťažiach, kolách a zápasoch. Počet kôl a typ súťaže je flexibilný a môže sa meniť v rámci rôznych súťaží.

Ak si želáte zaznamenať víťaza súťaže, môžeme pridať do tabuľky "Sutaze" stĺpec "id_vitaz_druzstva" ako referenciu na tabuľku "Druzstva", ktorá by obsahovala identifikátor víťazného družstva.

Tento model vám umožní zaznamenávať a spravovať údaje o družstvách, súťažiach, kolách a zápasoch v rámci jednej súťaže. Môžete si ho prispôsobiť a rozšíriť podľa konkrétnych potrieb vášho projektu.

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 7426
  • Karma: 44
    • Verze Delphi: W11 + D11.3.1
Re:zimomriavky (husi kuze) z openAI
« Odpověď #36 kdy: 27-05-2023, 10:39:18 »
Ja som DB urobil podľa existujúceho projektu. Štruktúry tabuliek sa prakticky zhodujú.
Ďakujem.
Win11 64b, Delphi 12.2, FireBird 4.01
Expert na kladenie nejasne formulovaných otázok.

Offline František

  • Guru
  • *****
  • Příspěvků: 916
  • Karma: 8
    • Verze Delphi: comunity 10.4.2, D2007, D12, D2009
Re:zimomriavky (husi kuze) z openAI
« Odpověď #37 kdy: 27-05-2023, 13:19:47 »
to bola len ukazka otazky a opdovede, keby som mu zadal ze urob mi script z toho pre lubovolny DB engine .. tak hadaj

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 7426
  • Karma: 44
    • Verze Delphi: W11 + D11.3.1
Re:zimomriavky (husi kuze) z openAI
« Odpověď #38 kdy: 27-05-2023, 13:29:07 »
Tak som to bral. Naformulovať pre AI otázku pre moju potrebu neviem. Stále to bude vo všeobecnej rovine.
Win11 64b, Delphi 12.2, FireBird 4.01
Expert na kladenie nejasne formulovaných otázok.

Offline František

  • Guru
  • *****
  • Příspěvků: 916
  • Karma: 8
    • Verze Delphi: comunity 10.4.2, D2007, D12, D2009
Re:zimomriavky (husi kuze) z openAI
« Odpověď #39 kdy: 27-05-2023, 14:54:41 »
pozri si odzaciatku toto vlakno, ako som postupne pridaval poziadavky a ako to AI pretvarala a doplnala

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 7426
  • Karma: 44
    • Verze Delphi: W11 + D11.3.1
Re:zimomriavky (husi kuze) z openAI
« Odpověď #40 kdy: 27-05-2023, 15:12:17 »
Hlavný problém je v tom, že
  • ja som to skúsil zo zvedavosti
  • základnú myšlienku riešenia mám v hlave. Detaily sa vyrysujú pri riešení
Možno ešte niečo skúsim. Počas riešenia môže vyskočiť niečo zaujímavé. Ak áno, dám vedieť.
Win11 64b, Delphi 12.2, FireBird 4.01
Expert na kladenie nejasne formulovaných otázok.

Offline Daniel_Andrascik

  • Guru
  • *****
  • Příspěvků: 587
  • Karma: 20
    • Verze Delphi: D2007, D10.4
Re:zimomriavky (husi kuze) z openAI
« Odpověď #41 kdy: 27-05-2023, 15:38:41 »
Ja si uz asi dva mesiace aj platim Pro alebo Plus pristup k OpenAI aby som mal najvyssi model a musim povedat ze s tym prestanem. Zatial sa to neoplati. Ako ano, co sa vo velkom riesilo na internetovych forach a tutorialoch tak to celkom pekne vedelo prezentovat. Cize ano, ked chcem pomoct s niecim co sa dookola riesi na nete tak mi to odpviel "like a charm". Ale ja programujem predovsetkym stroje, PLCecka a pod a zadam mu exaktnu ulohu ktoru potrebujem vyriesit, tak este kostru to mozno ako tak navrhne, ale zvysok si musim odpracovat sam a odladit. Ale ta praca je presne v tych detailoch a to mi s nimi takmer vobec nepomoze, musim si to stale oddriet sam. Ani zdaleka to nevie spravit v mojom pripade robotu za mna 🤷🤷🤷

Offline Daniel_Andrascik

  • Guru
  • *****
  • Příspěvků: 587
  • Karma: 20
    • Verze Delphi: D2007, D10.4
Re:zimomriavky (husi kuze) z openAI
« Odpověď #42 kdy: 27-05-2023, 15:40:24 »
Ja si uz asi dva mesiace aj platim Pro alebo Plus pristup k OpenAI aby som mal najvyssi model a musim povedat ze s tym prestanem. Zatial sa to neoplati. Ako ano, co sa vo velkom riesilo na internetovych forach a tutorialoch tak to celkom pekne vedelo prezentovat. Cize ano, ked chcem pomoct s niecim co sa dookola riesi na nete tak mi to odpviel "like a charm". Ale ja programujem predovsetkym stroje, PLCecka a pod a zadam mu exaktnu ulohu ktoru potrebujem vyriesit, tak este kostru to mozno ako tak navrhne, ale zvysok si musim odpracovat sam a odladit. Ale ta praca je presne v tych detailoch a to mi s nimi takmer vobec nepomoze, musim si to stale oddriet sam. Ani zdaleka to nevie spravit v mojom pripade robotu za mna 🤷🤷🤷

ale vlastne chvala bohu, nemusel by som uz potom mat robotu 🙈, ale uvidime co bude o rok o dva

Offline pf1957

  • Padawan
  • ******
  • Příspěvků: 3531
  • Karma: 139
    • Verze Delphi: D2007, XE3, DX10
Re:zimomriavky (husi kuze) z openAI
« Odpověď #43 kdy: 27-05-2023, 20:20:13 »
Ja si uz asi dva mesiace aj platim Pro alebo Plus pristup k OpenAI aby som mal najvyssi model a musim povedat ze s tym prestanem. Zatial sa to neoplati.
Ja toho chatbota celkem pravidelne trapim ovsem v oblasti mimo IT.

Verze 3 byla ochotna se norit do hloubky, sice si nedelal prilis starosti s vymezenymi podminkami napr. prvok/cerv, in vitro/vivo, vymyslel si neexistujici citace odbornych praci a nakonec priznal, ze nevi nebo to nemuze najit.

Ve verzi 4 se mi zda, ze to jeho bajeni vyresili tak, ze pisou, ze maji data jen do roku 2021, uz zadne citace odbornych praci neposkytuji a odpovidaji jen obecnymi slinty, jak oslovit autory, vydavatele, univerzity aj. A u zadneho problemu se mi ho nepovedlo primet k nejake vetsi expertize - Kdyz ho k tomu tlacim, tak jako radny sprt zopakuje muj dotaz v odpovedi a pritaka, ze mam pravdu, obcas neco doplni, ale hlavne neopomene rozvlacne pripojit, ze jeho odpoved se zaklada na obecnych znalostech a ze nedisponuje detailnimi informacemi a ze se mam obratit na toxikologa, veterinare atd.

A i kdyz mu vysvetlim, ze nechci nikoho lecit ani travit, ale zajima me, jak to funguje, tak se sice omluvi ale v dalsi odpovedi si ten pravni alibismus zase neodpousti.

Za me je ta verze 4 pro ziskavani znalosti horsi nez ta predchozi i se vsemi neduhy, ktere mela, asi jako by slezli z universitni urovne na gympl.

Offline Jan Fiala

  • Hrdina
  • ****
  • Příspěvků: 449
  • Karma: 6
    • Verze Delphi: 10.4.1
    • PSPad editor
Re:zimomriavky (husi kuze) z openAI
« Odpověď #44 kdy: 28-05-2023, 13:03:52 »
Za me je ta verze 4 pro ziskavani znalosti horsi nez ta predchozi i se vsemi neduhy, ktere mela, asi jako by slezli z universitni urovne na gympl.

To neni nic proti Bingu. Ten se chova jako male decko - kdyz mu reknes, ze nema pravdu, ukazes mu v cem, tak se urazi a ukonci hovor

Offline pf1957

  • Padawan
  • ******
  • Příspěvků: 3531
  • Karma: 139
    • Verze Delphi: D2007, XE3, DX10
Re:zimomriavky (husi kuze) z openAI
« Odpověď #45 kdy: 28-05-2023, 14:33:32 »
To neni nic proti Bingu. Ten se chova jako male decko - kdyz mu reknes, ze nema pravdu, ukazes mu v cem, tak se urazi a ukonci hovor
Ten jsem nezkousel, protoze kdyz mu chci polozit otazku napr. ve Skype, tak chce, abych se pridal na nejaky wait list a ze mi nejdriv posle email do schranky, kterou normalne nectu... Tak na to mu nejsem zvedavej.

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 7426
  • Karma: 44
    • Verze Delphi: W11 + D11.3.1
Re:zimomriavky (husi kuze) z openAI
« Odpověď #46 kdy: 28-05-2023, 15:47:58 »
Citace
Ten jsem nezkousel, protoze kdyz mu chci polozit otazku napr. ve Skype, tak chce, abych se pridal na nejaky wait list a ze mi nejdriv posle email do schranky, kterou normalne nectu...
Akonáhle niektorý web po mne niečo podobné požadujem, tak v tej chvíli s ním skončím. Preto som Bing neskúsil.
Win11 64b, Delphi 12.2, FireBird 4.01
Expert na kladenie nejasne formulovaných otázok.

Offline JaroB

  • Guru
  • *****
  • Příspěvků: 1144
  • Karma: 29
    • Verze Delphi: XE8, Sydney
Re:zimomriavky (husi kuze) z openAI
« Odpověď #47 kdy: 28-05-2023, 18:45:52 »
 ??? Bing po mně chce vědět, proč já chci něco vědět/vyhledat. A to něco není zrovna výroba střelného prachu nebo složení špinavé bomby.  ::) Prostě je zvědavý a pokládá dodatečné otázky  :( Ale je to divné

Offline Jan Fiala

  • Hrdina
  • ****
  • Příspěvků: 449
  • Karma: 6
    • Verze Delphi: 10.4.1
    • PSPad editor
Re:zimomriavky (husi kuze) z openAI
« Odpověď #48 kdy: 29-05-2023, 08:12:35 »
Ten jsem nezkousel, protoze kdyz mu chci polozit otazku napr. ve Skype, tak chce, abych se pridal na nejaky wait list a ze mi nejdriv posle email do schranky, kterou normalne nectu... Tak na to mu nejsem zvedavej.

Spustit Edge a jit na
https://www.bing.com/search?form=MY02AP&OCID=MY02AP&q=Bing+AI&showconv=1
není třeba skype ani zadne registrace