Rad sa listama

liste([], _).
liste([G | _], G).
liste([_ | R], C):- liste(R, C).

/* Broj elemata u listi */
zad2([], 0).
zad2([_ | R], N):- zad2(R, N1), N is N1 + 1.