P désigne le périmètre du cercle (C)

A désigne l'aire du cercle (C)

(C) est un cercle de rayon 1

O = Intersect(xAxis, yAxis)
A = Point(xAxis)
n = 3 (slider from 3 to 256, step 1)
c = Circle(O, A)
P = Sequence((cos(((i * 360) * ° / n)), sin(((i * 360) * ° / n))), i, 1, n)
poly1 = Polygon(Element[P, 1], Element[P, 2], n)
L = Perimeter(poly1)
H = Midpoint(Element[P, 1], Element[P, 2])
OH = Distance(O, H)
d: OH
poly1' = Dilate(poly1, 1 / d, O)
L' = Perimeter(poly1')
texte1: "" + (LaTeX[L]) + "<P<" + (LaTeX[L']) + ""
a = Area(poly1)
a' = Area(poly1')
texte4: "" + (LaTeX[a]) + "<A<" + (LaTeX[a']) + ""