obrat([X|Y],Z,Rez):-obrat(Y,[X|Z],Rez).
obrat([],Rez,Rez).
obrat(X,Y):-obrat(X,[],Y).