如何阅读arraylist“并在prolog中打印？

Question

如何读取数组“列表”＆amp;打印在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).