Εξωτερικό Πολύγωνο

Εσωτερικό Πολύγωνο

ρ = 1 (slider from 0 to 5, step 0.1)
A = (5.332638940097068, -0.11445725793428815)
c = Circle(A, ρ)
ν = 3 (slider from 3 to 800, step 1)
B = Point(c)
B' = Rotate(B, (2 * 3.141592653589793 / ν), A)
α = Angle(B, A, B')
inner, a, b, d, C = Polygon(B, B', ν)
e = Tangent(C, c)
f = Tangent(B, c)
g = Tangent(B', c)
E = Intersect(f, g)
H = Intersect(e, g)
outer, e_1, h_1, h, I = Polygon(E, H, ν)
κείμενο1: "Εμβαδόν εξωτερικού πολυγώνου: " + outer
κείμενο2: "Εμβαδόν εσωτερικού πολυγώνου: " + inner
dif: outer - inner
κείμενο3: "Διαφορά εμβαδών: " + dif
i = false
j = false