Logo.... ¡cielos! Odio las filas...

FILAS
para fila :ncuadrados :lado
repite :ncuadrados[cuadrado :lado sl gd 90 av :lado+20 gi 90 bl]
Fin

POLÍGONO
para poligono :nlados :lado
haz "angulo 360/:nlados
repite :nlados[av :lado gd :angulo]

Fin