LOGO - Silba 2012 - Zadaća: Pregled :: Kristijan Burnik

to pregled :l
	raspisi :l "||
end

to raspisi :l :put
	pr (list :put "|=>| :l)
	if not listp :l [ stop ]
	foreach :l [
		raspisi ? (word :put "/ #)
	]
end