在Prolog中如何进行循环迭代

在Prolog中通常使用递归来进行循环迭代。下面是一个简单的示例，展示如何在Prolog中实现循环迭代：

% 定义一个简单的递归迭代函数
loop(0).
loop(N) :-
    write(N), nl,
    N1 is N - 1,
    loop(N1).

% 调用loop函数进行循环迭代
?- loop(5).

在这个示例中，loop/1 是一个用于循环迭代的递归函数。当 N 的值为0时，递归终止；否则，打印当前的 N 值并递减 N，调用自身进行下一次迭代。最后，在Prolog中调用 loop(5) 会输出以下内容：

5
4
3
2
1