Question

我有一个包含三个要素的清单X; ID，名称和成绩。全部取自用户输入

read_student_info([A, B, C]),
nl, nl, menu([[A, B, C] | X]).

read_student_info([A, B, C]) :-
  write('\tStudent ID: '),
  read(A),
  write('\tStudent Name: '),
  read(B),
  write('\tStudent Grade: '),
  read(C).

现在，我想显示列表中的元素。所以，如果我有一个ID = 3的学生，姓名= Tom，等级= 78.这就是我要打印的内容。我一直在愚弄的当前功能是：

show_records(X) :-
  X = [A | B],
  A = [C | D],
  id = write(C),
  name = format("~s", [B]),
  grade = write(D),
  show_records(B).

然而，我是第一个承认我几乎不知道我在做什么的人。任何帮助将非常感谢！

Answer 1

只是建议一种清理方法：

show_records([]).
show_records([A|B]) :-
  format('ID = ~w\tName = ~w\tGrade = ~w~n',A),
  show_records(B).

试验：

?- show_records([[1,abel,10], [2,goofy,4]]).
ID = 1  Name = abel Grade = 10
ID = 2  Name = goofy    Grade = 4

显然，标签不是最佳的，但使用简单

Answer 2

我已经弄明白了，无论如何。这是我的修订版。

show_records(X) :-
X = [A | B],
write('\tID = '),
A = [C | D],
write(C),
write('\tName = '),
D = [E | F],
format("~s", [E]),
write('\tGrade = '),
F = [G | H],
write(G),
nl,
show_records(B).

在Prolog中打印出List的元素

2 个答案: