# Dibujar triángulos en serie

restaurar 

aprender triangle X [ 
  repetir 3 [  
    avanzar X
    izquierda 120
  ]
]

para r = 1 a 30 [
  limpiar
  repetir 18 [
    triangle r*r*5
    dch 20
  ]
  esperar 1
]

esperar 3 
limpiar 

escribir "  Me cansé..."