Diff for ''

Revision 118
Author:
black
Time:
2022-08-26 02:23
Revision 1
Time:
2024-06-13 22:31
Deletions are marked like this. Additions are marked like this.
Line 1: Line 1:
Oficiální stránky [http://ktv.mff.cuni.cz/ katedry tělesné výchovy], konkrétní sporty viz. níže. # Příklad do prologu
Line 3: Line 3:
= Historický šerm =
* klub historického šermu se zaměřením na volný bojový šerm Duelanti od svatého Rocha přijímá nováčky
* cvičí se 2x týdně pondělí a středa od 20:00 v tělocvičně ZŠ Lupáčova, Olšanské náměstí Žižkov
* první měsíc bývá zdarma, potom cca 500kč / měsíc, pro nováčky se na první půlrok najde i nějaký ten meč
* kontakt: https://www.facebook.com/duelanti/
<{ForumPost(poster="wweennddeell", timestamp=2010-06-28 22:20:08)}>
Dobrý den,
  
potřeboval bych pomoct naprogramovat úlohu v prologu. Hledal jsem nějaké řešení na internetu, ale nic jsem nenašel a absolutně si s tím nevím rady.
  
Úloha zní takto: Na vstupu je zadán graf, který obecně není stromem. Napište program v jazyce Prolog, který vytiskne pro zadaný uzel grafu všechny cykly grafu, jichž je daný uzel prvkem.
  
Budu rád za každou Vaši pomoc...
<{/ForumPost}>
Line 9: Line 13:
= Plavání =
* matfyzáčtí plavci nejsou žádný B-čka: [http://plavani.matfyz.cz]
* v [[SCUK|sportovním centru Univerzity Karlovy]] v hodinách pro veřejnost za 80 Kč na ISIC - [http://bazen-hostivar.717.cz/ Plavecký bazén Hostivař] - neoficiální, přesto stále aktualizované stránky
* Plavecký bazén na Výstavišti [http://www.incheba.cz/bazen zde]
* [http://www.pspodoli.cz/ plavárna v Podolí]
** možnost plaváni ve vnitřním krytém bazénu i ve vnějším, který je přes zimu vyhřívaný (kolem 27 stupňů)
** k dispozici je v ceně také pára (aka mokrá sauna)
* ostatní na [http://www.koupani.cz/koupani/]
<{ForumPost(poster="H8me", timestamp=2010-06-29 17:12:28)}>
Zdarec,
co to to ? Je to pre orientovany graf.
Line 18: Line 17:
= Squash =
* centrum [http://www.squashe.cz/index.php?mm=hastal Haštal] - [http://www.squashe.cz/index.php?mm=hastal&s=2 ceny] pro studenty 130,- za kurt a hodinu (Pá, So, Ne večer dokonce 110,-)
* [http://www.mybox.cz/squash-holesovice/ Squash Holešovice] - z Nádraží Holešovice cca 5min na zastávku Maniny (tram #12), [http://www.mybox.cz/squash-holesovice/cenik.htm ceny] pro studenty 130,- za kurt a hodinu
    %graf je zoznam hran v tvare h(X,Y)
    
    vsetkyCykly(Hrany,X,Out):-findall(C,(cyklus(Hrany,X,X,[],C),length(C,Len),Len > 1),Out).
    
    cyklus(_,X,X,Akum,Akum).
    cyklus(Hrany,X,Y,Akum,Out):-member(h(Y,N),Hrany), not(member(N,Akum)), cyklus(Hrany,X,N,[N|Akum],Out).
    
Line 22: Line 25:
* [http://www.squasharbes.cz/Default.aspx/ Squash Arbes] - Arbesovo náměstí, pro informatiky blízko ze školy, studentská cena 170,- za kurt a hodinu
Line 24: Line 26:
= Bruslení =
* zimní stadion [http://www.nikolajka.eu/ Nikolajka] - Anděl
** cena: 40,- Kč
** - mnoho lidí
* stadion na [http://www.stvanice.cz/ Štvanici]
** cena: 80,- Kč
** + kulturní zážitek
* stadion pri OC[http://www.icearena.cz/index.php Letnany]
** cena: 80,- Kč
** + kvalita ledu
** + servis
** - vzádlenost od Troje
* [http://www.incheba.cz/main.php?pageid=56 malá sportovní hala] na pražském výstavišti
** cena: 50,- Kč
** + dostupnost z Troje
** - žádný bufet ani automat
* bruslení [http://supermapy.centrum.cz/map.php?ql=&qlc=-1&bbox=3460802.697119341:5552560.1201646095-3462552.697119341:5553950.037860082&mapsize=1&poi=2,6,7,8&stred=0:0&origin=&sid=&okoli=&search_flag=6 v mrtvém rameni Vltavy] :)
** + stačí zajít na Palmovku a odtud seběhnout k vodě
** + cena :)
** - závislost na počasí
* [http://www.praha13.cz/ruzne/stadion/ školní zimní stadion Bronzová] (metro B, stanice Lužiny)
** cena: 30,- Kč za hodinu, 50,- Kč za 3 hodiny
** - v sezóně 2005/2006 mimo provoz
* stadion [http://www.hckobra.cz/ HC Kobra Praha]
** cena: 60,- Kč
** otevřeno pro veřejnost: So, Ne - 13:15 až 15:15
** - vzdálenost (viz [http://www.mapy.cz/?query=Loc:%2050%C2%B01'53.17%22N,14%C2%B025'38.8%22E&zoom=16&mapType=base&centerX=133089632&centerY=135753376#centerX=133087791@centerY=135753054@typ=base@zoom=15@vizType=none@vizIds=none mapa])
** - hodně lidí
<{/ForumPost}>

<{ForumPost(poster="wweennddeell", timestamp=2010-06-29 23:05:55)}>
Díky moc za snahu. Ten prolog je pro mě kámen úrazu.
  
Jestli sem to dobře pochopil, tak mám například tyto hrany:
  
h(b,c).
h(f,c).
h(g,h).
h(d).
h(f,b).
h(k,f).
h(h,g).
  
Co mám teda napsat za vstupní podmínku, aby mi prolog vypsal všechny cykly třeba uzlu f (i když v tomhle příkladu je pouze jeden cyklus).
  
Řešení sem našel na téhle stránce: [https://prof.ti.bfh.ch/hew1/informatik3/prolog/p-99/](https://prof.ti.bfh.ch/hew1/informatik3/prolog/p-99/) .Příklad P82 by měl být přesně ten, co hledám, bohužel vůbec nevím jak ten program mám z toho sestavit.
<{/ForumPost}>

<{ForumPost(poster="H8me", timestamp=2010-06-29 23:25:14)}>
Neviem co ma vyjadrovat h(d) ale ked to preskocim tak dotaz pre tvoj priklad by vyzeral takto:
  
vsetkyCykly(\[h(f,c),h(g,h),h(f,b),h(k,f),h(h,g)],f,Out).
  
Out je volna premenna, ta vrati zoznam cyklov.
  
A to riesenie co si postol funguje na tom istom principe, tiez vyhladava cesty v grafe zo zaciatkom aj koncom v tom istom bode.
<{/ForumPost}>

<{ForumPost(poster="Andrew24", timestamp=2015-01-12 13:58:54)}>
Mohl by mi prosím někdo poradit jak by to vypadalo kdyby se měly na konci vypsat všechny cykly jichž daný uzel **neni** prvkem? díky
<{/ForumPost}>