What commands to draw pentagon in logo?

to draw-pentagon :length

pd

seth 126

repeat 5 [ fd :length rt 72 ]

end

Draws a pentagon "length" pixels on each side, with the turtle originating and terminating at the apex.