Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- afis([]).
- afis([Q|W]):-write(Q),afis(W).
- inv([]).
- inv([A|B]):-inv(B),write(A).
- list([],[]).
- list([C|D],[E|F]):-inv(D),write(C),write(E),afis(F).
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement