print_n(0):- nl.
print_n(N):-N>0,write('*'),N1 is N-1,print_n(N1).

prikazi_listu([]).
prikazi_listu([X|Rep]):- print_n(X),prikazi_listu(Rep),!.