O = (2.26, 1.02)
c = Circle(O, 3)
C = Point(c)
D = Point(c)
A = Point(c)
B = Point(c)
f = Tangent(A, c)
g = Tangent(B, c)
h = Tangent(C, c)
i = Tangent(D, c)
E = Intersect(f, g)
F = Intersect(f, i)
G = Intersect(h, i)
H = Intersect(g, h)
j = Segment(E, F)
k = Segment(F, G)
l = Segment(G, H)
m = Segment(H, E)
kaugusEj = Distance(E, j)
kaugusEm = Distance(E, m)
Midpoint(E, ClosestPoint[m, E])
kaugusFG = Distance(F, G)
Midpoint(F, G)
TekstFG: Name[F] + (Name[G]) + " = " + kaugusFG
kaugusGH = Distance(G, H)
Midpoint(G, H)
TekstGH: Name[G] + (Name[H]) + " = " + kaugusGH
kaugusHE = Distance(H, E)
Midpoint(H, E)
TekstHE: Name[H] + (Name[E]) + " = " + kaugusHE
kaugusEF = Distance(E, F)
Midpoint(E, F)
TekstEF: Name[E] + (Name[F]) + " = " + kaugusEF
q1, e, f_1, g_1, h_1 = Polygon(E, F, G, H)