배열 "목록"을 읽고 프롤로그에서 어떻게 인쇄합니까?

Question

배열 "목록"을 읽는 방법 & 프롤로그에서 인쇄 하시겠습니까? 프롬프트 사용자 배열 를 삽입하는 사용자 일부 그는 그런 을 끝낸 나는 그것이

난 그냥 조건이 만드는 방법을 생각할 수 없다 인쇄하는 것이 방법을 알려줍니다 -이 : 내가 할 필요가있다.

Answer 1

이게 당신이 원하는 것입니까?

1 ?- p(X). 

|: a. 

|: b. 

|: c. 

|: d. 

|: end. 

코드 : -

X = [a, b, c, d]. 

이 하나가이 동작을 구현할 수있는 방법입니다

p(X) :- read(A), q(A,X-[]). 

q(end,X-X) :- !. 

q(A,[A|X]-Y) :- read(B), q(B,X-Y).