A = (1.6, 2.02)
r = 2.6 (slider from 1 to 5, step 0.1)
c = Circle(A, r)
B = Point(c)
n = 3 (slider from 3 to 80, step 1)
a: 360 / n
B' = Rotate(B, a°, A)
α = Angle(B, A, B')
polígono1, b, d, e, C = Polygon(B, B', n)
z: π * r^(2)
texto1: "A(n) = Área do polígono regular de n=" + n + " lados,
inscrito no círculo dado de raio r=" + r + "."
texto2: "A(n) = " + polígono1 + ""
texto3: "A = área do círculo = " + z + ""
j: z - polígono1
texto4: "Erro= A - A(n) = " + z + "-" + polígono1 + " = " + j + ""
f: z / r^(2)
g: polígono1 / r^(2)
texto5: "\mbox{Note que} \  \displaystyle\frac{A(n)}{r^2}=" + (LaTeX[g]) + " \longrightarrow \pi, \ \mbox{quando} \ {n\to\infty}"