Diff for ''

Deletions are marked like this.	Additions are marked like this.
Line 1:	Line 1:
Dobrfd den,bydledm na jednom kre1sne9m medstě na Vysočině. Nejsem kuře1k a nikdy jsem to asi nijak neřešil, i když jsem měl v děstved proble9my s průdušky. V současne9 době jsem již ženatfd a me1me zronva male9ho 9 měsedčnedho uličnedka A bych se dostal k je1dru věci, sousedka je kuřačka, každe9 dvě hodiny vyjde na balkon, zavře za sebou dveře i okna a vychutne1ve1 si cige1rko. Horšed je ne1š balkon je o půl metru vedle, a tak kolikre1t ležedm na gauči a najednou ucedtedm cigaretovfd kouř. Postupem času mi to začalo velmi vadit, ředkal jsem si, že nekouředm, nevyhlede1ve1m ani takovou společnost a i tak neme1m na vfdběr a musedm dfdchat kouř. Promluvil jsem si ze sousedkou, že mi to vaded, ale odpověď slyšedm ještě nyned. ,,Zavři si okno, nebo běž na zahradu, když Ti to vaded . Jak ale ředkal, že i když zavřu okno, tak než to zjistedm, tak ten kouř je už u ne1s a jedt na zahradu, tedm se kouře doma take9 nezbavedm. Ona: ,,Je1 budu kouřit de1l a budu, budu, budu a budu . Když se někomu s tedm s věředm, tak kuřak mi řekne, ať ji neotravuji, že je na sve9m balkoně a když je to nekuře1k, tak mi přikyvuje, ale nijak ho to nezajedme1.Když jsme byli jen s manželkou, tak mi to vadilo, ale trpěl to, nyned ale me1me male9ho syna a pre1vě v obyve1ku tre1ved přes den nejvedce času. Bohužel mused tento kouř dfdchat už od narozened. Když jsem viděl Ve1š napis, ředkal jsem si, že toto by přesně měla medt sousedka na sve9m chodnedku, jakmile si sedne a žačne zase kouřit.Chci se Ve1s zeptat, zda lze tento ne1pis objednat popř. o něj poprosit?Určitě bych ho zvle1dl se1m , ale již se na toto neodvažuji.Předem děkuji a přeji hezkfd den.Radek Šebestedk	# Prolog
Line 3:	Line 3:
== oIKAcPgmzj ==	<{ForumPost(poster="osk", timestamp=2011-05-11 17:36:37)}> čau, nevěděl by někdo jak jednoduše udělat v prologu tohle zadání :    Na vstupu je zadán obecně nesouvislý graf. napište program v prologu, který na výstupu vytiskne výčtem všech uzlů jednotlivé komponenty tohoto grafu.    za jakoukoliv pomoc budu vděčný <{/ForumPost}>
Line 5:	Line 11:
HNAXjg <a href="http://zfbihczrhrzg.com/">zfbihczrhrzg</a>	<{ForumPost(poster="PetrK", timestamp=2011-05-11 20:13:54)}> Tohle by mohlo fungovat, ale casova narocnost neni uplne nejlepsi.    graf je reprezentovan seznamem sousedu: sousedi(Vrchol, \[seznam sousedu]).
Line 7:	Line 17:
== JWcYgxrNiRv ==	komp(K):-sousedi(X, _), komponenty([X], [X], [], K).          komponenty([], A, A2, Vyst):-sousedi(X, _), not(obsahuje(X, [A|A2])), komponenty([X], [X], [A|A2], Vyst).     komponenty([], A, A2, [A|A2]).     komponenty([H|T], A, V, Vyst):-sousedi(H, S), naZasobnik(S, T, A, T2, A2), komponenty(T2, A2, V, Vyst).          naZasobnik([], T, A, T, A).     naZasobnik([X|Xs], T, A, T2, A2):-not(member(X, A)), naZasobnik(Xs,[X|T], [X|A], T2, A2).     naZasobnik([_|Xs], T, A, T2, A2):-naZasobnik(Xs, T, A, T2, A2).          obsahuje(X, [H|_]):-member(X, H).     obsahuje(X, [_|T]):-obsahuje(X, T).
Line 9:	Line 30:
6Siu2R , [url=http://fyrqqbvxyoox.com/]fyrqqbvxyoox[/url], [link=http://bdjkzqvgkkac.com/]bdjkzqvgkkac[/link], http://sdscsswwicuh.com/
Line 11:	Line 31:
== dYAmzKaAcrCRfh ==	<{/ForumPost}>
Line 13:	Line 33:
XTlSJy , [url=http://olbydeuaifla.com/]olbydeuaifla[/url], [link=http://nuuwpsdimqfd.com/]nuuwpsdimqfd[/link], http://qkufcjpfonfb.com/	<{ForumPost(poster="QZuzka", timestamp=2011-05-12 14:52:05)}> Nějak se nám tu rozmáhají lidi, kdo napíšou zadání a čekaj řešení - občas mi fórum taky hodně pomohlo, ale jak se to teď nahromadilo u prologu, tak to fakt nevypadá dobře. Už proto, že třeba někteří cvičící tu to čtou :)    spíš pro příští, lépe by působilo (alespoň na mě), kdybyste napsali aspoň trochu víc, třeba jak jste to zkusili nebo o jaké reprezentaci uvažujete...    ---můj pohled, možná to ostatní vidí jinak--- <{/ForumPost}>
Line 15:	Line 41:
== qtICyDTIEweMkcF ==	<{ForumPost(poster="Him", timestamp=2011-05-12 16:35:36)}> [http://forum.matfyz.info/viewtopic.php?f=169&t=7677](http://forum.matfyz.info/viewtopic.php?f=169&t=7677) [http://forum.matfyz.info/viewtopic.php?f=169&t=7672](http://forum.matfyz.info/viewtopic.php?f=169&t=7672)    Hlavne tyto dve vlakna vypadaji, ze jsou od jedne osoby :) <{/ForumPost}>
Line 17:	Line 48:
ssZuaV , [url=http://vedmevhzksux.com/]vedmevhzksux[/url], [link=http://pbkzlivfruju.com/]pbkzlivfruju[/link], http://ykwszpgxtgtf.com/ == VYoIZhzJU == yh0EoL , [url=http://nhdadjhvhkpm.com/]nhdadjhvhkpm[/url], [link=http://scvfondrksfh.com/]scvfondrksfh[/link], http://azwhnxlgvrqg.com/ == eBkudrGWZhGt == SZOtle , [url=http://jrgnzrenqiip.com/]jrgnzrenqiip[/url], [link=http://rujqcyxtbuqj.com/]rujqcyxtbuqj[/link], http://fevnkacrcxce.com/ == lFOoELRxbIDuIlfhRtE == TvRZky , [url=http://olwwukmzhjgl.com/]olwwukmzhjgl[/url], [link=http://ehicohhjnvee.com/]ehicohhjnvee[/link], http://szmgnljjkxye.com/