Prolog程序輸出列表的最後一個元素和前一個元素

Question

我需要類似於此的last_And_prelast（[5，a，d，2]，A，B）輸出A = d和B = 2

感謝

Answer 1

此問題已經在這裏解決：How to get the 2 last values from a list in recursion and in tail-recursion?

使用此

last2_2([_|T],X,Y) :- last2_2(T,X,Y). 

或本

last2_2([_,_|T],Y,Z):-last2_2(T,Y,Z). 
last2_2([_,A,B],A,B). 

Answer 2

你可以嘗試使用內建命令，如建議通過@CappeliC：

last2(Xs , A , B) :- append(_,[A,B],Xs) . 

甚至

last2(Xs , A , B) :- reverse(Xs,[B,A|_]) . 

或者你可以嘗試滾動自己

last2([A,B] , A , B) . 
last2([_|Xs] , A , B) :- last2(Xs,A,B) . 

有不止一個方法來做到這一點。