GeometricScene[{{A.,B.,C.,D.,E.},{}},{GeometricAssertion[{Polygon[{A.,B.,C.,D.,E.}]},"Equilateral","Convex"],PlanarAngle[{B.,A.,E.}]PlanarAngle[{A.,E.,D.}]PlanarAngle[{D.,C.,B.}]},{GeometricAssertion[{Polygon[{A.,B.,C.,D.,E.}]},"Equiangular"]}]