GeometricScene[{{A.,O.,B.,C.,D.,E.,F.,G.,H.,I.,J.},{}},{{CircleThrough[{A.},O.]},{B.∈CircleThrough[{A.},O.],C.∈CircleThrough[{A.},O.],D.∈CircleThrough[{A.},O.],E.∈CircleThrough[{A.},O.],GeometricAssertion[{Polygon[{A.,B.,C.,D.,E.}]},"Regular"]},{GeometricAssertion[{Line[{F.,A.,G.}],CircleThrough[{A.},O.]},{"Tangent",A.}],GeometricAssertion[{Line[{G.,B.,H.}],CircleThrough[{A.},O.]},{"Tangent",B.}],GeometricAssertion[{Line[{H.,C.,I.}],CircleThrough[{A.},O.]},{"Tangent",C.}],GeometricAssertion[{Line[{I.,D.,J.}],CircleThrough[{A.},O.]},{"Tangent",D.}],GeometricAssertion[{Line[{J.,E.,F.}],CircleThrough[{A.},O.]},{"Tangent",E.}]}},{GeometricAssertion[{Polygon[{F.,G.,H.,I.,J.}]},"Regular"]}]
