A = (-4.224, -6.744)
B = (9.64, -6.76)
C = (-1.551, 0.6784)
D = (5.9268, 2.203)
E = (0.0704, -5.3474)
c = Circle(C, D, E)
F = Center(c)
d = 10 (slider from 0 to 30, step 1)
G = Point(c)
l1 = Sequence(Rotate[G, (i * (360°) / d), F], i, 0, d)
l2 = Sequence(Segment[F, Element[l1, i]], i, 1, d)
n = 2 (slider from 0 to d, step 1)
l3 = Sequence(Sector[c, Element[l1, i], Element[l1, i + 1]], i, 1, n)
texto1: "\frac{" + (LaTeX[n]) + "}{" + (LaTeX[d]) + "}"