Diff for ''

Deletions are marked like this.	Additions are marked like this.
Line 1:	Line 1:
# Prolog
Line 3:	Line 2:
<{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}>	# Format diskuse #
Line 11:	Line 4:
<{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]).	Diskuse se delaji po vlaknech `== Tema ==`, dalsi prispevky se odsazuji pomoci `*, **, ***, ...` a podepisuji pomoci `~~~~`.
Line 17:	Line 6:
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).	Kala oti einai aderfi einai oeanoflro .alla einai toso ksefonimeni na isxyrizetai oti i Kaneli tou askise prwti swmatiki via????Ase pou i Kaneli 2 lekseis na pei ton exei tapwsei to mapa giati n askhsei via? An k einai toso aderfi pou xalara ton exei tou xeriou tis i kaneli .Malista pisteuw den antapedwse ta xtypimata giati fovithike mh toy xalasei to make upVy jste banda ,ktere1 se věnuje trestne9 činosti !!!!!!!! Propagujete sve9 pojstoe nezakonnfdm jednanedm.A tedm chcete doke1zat co? Že jste banda krimine1lnedk s plnou hubou kecu,kteřed nedovedou nic jine9ho,než čme1rat po cizedm majetku!!?? To už jste doke1zali
Line 30:	Line 8:
	## gUcqGxCFhUmHRmMy ##
Line 31:	Line 10:
<{/ForumPost}> <{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}> <{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}>	I would like to express my tnahks to the writer just for rescuing me from such a problem. Right after checking throughout the world wide web and finding opinions which were not powerful, I figured my entire life was well over. Living minus the solutions to the problems you have solved through this guide is a critical case, and the ones that could have badly damaged my career if I hadn't noticed your site. Your own personal skills and kindness in taking care of all areas was very useful. I'm not sure what I would have done if I had not encountered such a stuff like this. It's possible to at this point relish my future. Thanks for your time so much for your high quality and sensible guide. I will not think twice to endorse your web site to anybody who needs to have guidance on this situation.J1rfl6 , \[url=http://quejpgvrgilf.com/]quejpgvrgilf\[/url], \[link=http://wktcufzbeakr.com/]wktcufzbeakr\[/link], http://gsobadwjiubm.com/