如何在Prolog中实现循环结构

在Prolog中实现循环结构可以使用递归来实现。以下是一个简单的示例，展示如何在Prolog中使用递归来模拟循环结构：

% 定义一个递归规则，实现循环结构
loop(0).
loop(N) :- 
    N > 0,
    write(N), nl,
    N1 is N - 1,
    loop(N1).

% 调用循环规则
:- loop(5).

在这个示例中，loop/1谓词实现了一个简单的循环结构，打印从N到1的数字。当N为0时，递归终止；否则，打印当前数字，减少N的值，然后递归调用loop/1规则。通过调用loop/1规则并传入起始值，可以实现类似循环的效果。