如何读取数组“列表”并在prolog中打印？

Question

如何读取数组“列表”&在prolog中打印？ 我需要： - 提示用户插入阵列 用户一些如何告诉我，他完成了 后来我打印

我只是想不出如何使这一个谓语。

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).