Parnepar
to kvadrat
repeat 4[fd 100 lt 90]
end
to osmerokut
repeat 8[fd 100 lt 360/8]
end
to peterokut
repeat 5[fd 100 rt 360/5]
end
to sedmerokut
repeat 7[fd 100 rt 360/7]
end
to sesterokut
repeat 6[fd 100 lt 360/6]
end
to trokut
repeat 3[fd 100 rt 120]
end
to parnepar
trokut
peterokut
sedmerokut
kvadrat
sesterokut
osmerokut
end