Logo - 递归程序

在递归过程中，过程内会重复调用过程。让我们考虑以下代码 −

to spiral_recur :n
    if :n < 1 [stop]
    fd :n
    rt 20
    spiral_recur 0.95 * :n
end

过程 spiral_recur 已从过程主体本身调用。以下屏幕截图显示了代码的执行和输出。