Meta: Averigüa el ángulo de giro para hacer otros polígonos.
to polygon
pd
setc whatcolor
repeat #sides [fd howbig rt angle]
end
to reset
cg
end
Notas - Haz un nuevo control llamado #sides (número de lados). Ponle 3 como mínimo y 60 como máximo (u otro número a tu elección).
- Haz otro control llamado howbig (cuán grande). Ponle 5 como mínimo y 200 como máximo.
- Haz un botón llamado polygon (polígono) y ponlo en "once" (una vez).
- Experimenta con diferentes entradas para #sides y angle para ver si puedes hacer diferentes polígonos (un pentágono o un hexágono), ¿cuántos grados tiene que girar la tortuga en total para cerrar la figura?
¿Qué pasa si?
¿Puedes poner los controles #sides y angle de tal forma que dibujen un cuadrado, un pentágono, un hexágono, y un octágono? (Anota el ángulo que se necesita para dibujar cada polígono).
Desafío
¿Puedes cambiar el nombre de un control y cambiar su nombre en el procedimiento de tal manera que el botón polygon siga funcionando bien?
¿Puedes escribir procedimientos y añadir botones para dibujar un cuadrado, pentágono, hexágono, y octágono (usando números en lugar de #sides y angle)?
|
