Ejemplos: Recursividad.

Acoplamiento

Este programa construye una rejilla regular usando métodos recurrentes. Los acoplamientos de 3, 4 y 6 son, respectivamente, rejillas triangulares, cuadradas y hexagonales. Cuanto mayor es el orden dado, más detalle se consigue en la rejilla.

empezar 4 3 produce un diagrama similar al triángulo de Sierpinski.

para empezar :orden :acoplado # Inicializamos Papel, lapiz y tortuga   reponetodo pontamañopantalla [400 400]   poncolorpapel negro poncolorlapiz verde   subelapiz ocultatortuga #   retrocede 192   haz "lado 384   rejilla :orden :lado :acoplado fin para rejilla :orden :lado :acoplado   si :orden < 1    [ bajalapiz avanza :lado      subelapiz retrocede :lado      alto ]   avanza :lado/2   repite :acoplado    [ rejilla :orden-1 :lado/2 :acoplado      giraizquierda 360/:acoplado ]      retrocede :lado/2 fin

Probar este programa ahora Procedimiento a ejecutar: empezar 4 6