Logo - 遞迴程式

在遞迴程式中，有程式內部的程式的重複呼叫。考慮以下程式碼 −

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

過程 spiral_recur 在過程體中被呼叫。以下螢幕截圖顯示了該程式碼的執行輸出。