Ejemplos: Espirales

Una magnífica rosa

Con ocho espirales, dibujamos una rosa.

para empezar # Inicializamos papel, lapiz y tortuga   reponetodo pontamañopantalla [400 400]   poncolorpapel negro subelapiz ocultatortuga   poncolorlapiz rojo #   repite 4 [    repitepara [angulo 12 1 -0.1]     [avanza 12 giraizquierda :angulo]    avanza 19 subelapiz ponxy 0 0 bajalapiz    repitepara [angulo 12 1 -0.1]     [avanza 12 giraderecha :angulo]    avanza 19 subelapiz ponxy 0 0 giraizquierda 90 subelapiz] fin

Probar este programa ahora Procedimiento a ejecutar: empezar