Α = (-12.148942440184957, 7.709192773969543)
Β = (-5.621431628207354, 7.769209303625602)
f = Segment(Α, Β)
Γ = Point(f)
g = OrthogonalLine(Γ, f)
c = Circle(Γ, Β)
Δ, Ε = Intersect(c, g)
h = Line(Ε, f)
i = OrthogonalLine(Α, f)
Ζ = Intersect(h, i)
j = Segment(Α, Ζ)
k = Segment(Ζ, Ε)
l = Segment(Ε, Γ)
q1, α, γ, ε, ζ = Polygon(Α, Γ, Ε, Ζ)
κείμενο1: "ΑΒ=" + f + ""
κείμενο2: "ΑΓ=" + α + ""
κείμενο3: "ΕμβΑΓΕΖ=" + q1 + ""
απόστασηΑΓ = Distance(Α, Γ)
περίμετροςq1 = Perimeter(q1)
Σημείοq1 = PointIn(q1)
κείμενο4: "ΠερίμετροςΑΓΕΖ=" + περίμετροςq1 + ""