Prolog - Prolog (listas)

apenas acabo de empezar a utilizar prolog y me dejaron unos ejercicios, los cuáles son contar los elementos de una lista, obtener el ultimo elemento y obtener el tercer elemento, espero que me resuelvan la duda, por favor

long([],0).
long([X|Xs],L):-length(Xs,L1), L is L1 + X.

long([],0).
long([X|Xs],L):-length(Xs,L1), L is L1 + 1.

ultimo lemento

ultimo([],[]).
ultimo([X],X).
ultimo(L,X):-append(_,X,L).

ultimo([],[]).
ultimo([X],X).
ultimo(L,X):-append(_,[X],L).

Por favor necesitamos barios ejercicios de prolon con lista con su respectiva esplicacion por fa responder.......