Β = (9.04, -1)
Α = (5.04, -1.02)
Β' = Rotate(Β, 90*°, Α)
b = Line(Β', Α)
Γ = Point(b)
πολύγ1, γ, α, β = Polygon(Α, Β, Γ)
δ = Angle(Β, Α, Γ)
a = Line(Α, Β)
ε = Angle(Β, Α, Β')
απόστασηΓΒ = Distance(Γ, Β)
ΚείμενοΓΒ: Name[Γ] + (Name[Β]) + " = " + απόστασηΓΒ
απόστασηΓΑ = Distance(Γ, Α)
ΚείμενοΓΑ: Name[Γ] + (Name[Α]) + " = " + απόστασηΓΑ
απόστασηΒΑ = Distance(Β, Α)
ΚείμενοΒΑ: "" + (Name[Β] + (Name[Α])) + " = " + απόστασηΒΑ + ""
α2, c, d, e, f, Δ, Ε = Polygon(Γ, Β, 4)
β2, g, h, i, j, Ζ, Η = Polygon(Α, Γ, 4)
γ2, k, l, m, n, Θ, Ι = Polygon(Β, Α, 4)