PROLOG Listy - Ostatni element listy

Treść zadania:
Napisz predykat który wybierze ostatni elementy z listy L.
Argumentem dla predykatu jest list n-elementowa.

Przykład:

Input:

last_element(X,[1,2,3,4,5]).

Output:

5

Input:

last_element(X,[a,b,c,d,e]).

Output:

e

Kod źródłowy:

last_element(X,[X]).
last_element(X,[_|O]):-last_element(X,O).

PROLOG Listy - Znaki pomiędzy elementami listy

Treść zadania:
Napisz predykat char_between_list(L), który wyświetla elementy listy oddzielając je znakiem "|".
argumentem dla predykatu jest lista.

Przykład:
Input:

char_between_list([a,b,c,d]).

Output:

a|b|c|d|

Input:

char_between_list([1,2,3,4]).

Output:

1|2|3|4|

Kod źródłowy:

char_between_list([]).
char_between_list([X|Y]):- write(X),write('|'),char_between_list(Y).