# Enlarge a Polygon Using Winlogo

This program will allow you to create any polygon of a specified size. By increasing the scale factor a series of polygons may be created similar to the one below.

The program is as follows:

**Polygon**

to polygon :sides :length :scale

make "angle 360/ :sides

make "enlarge :length*:scale

repeat :sides [fd :enlarge rt :angle]

end

To create a shape using this program the command **polygon 4 90
1** would create a square of enlargement factor 1 with side lengths
of 90.

To create other polygons alter the 4.

5 would make a pentagon etc.

Remember these useful commands:

**clearscreen** = clear the screen

**hideturtle** = hide the turtle