Question: how to generate polygon

can someone write code to replicate this in maple.

Begin with a square and draw an octagon inside it, as pictured. Now draw a regular 16-sided polygon inside the octagon, like so

i'm guessing it'll use the polygonplot comand

Please Wait...