Άσκηση1  μιγαδικών
Author: Emilv

Γ)))

Χορδή // χχ'

Διάμετρος απο το Α

Κινείστε ένα απο τα Α ,Β, Γ

ακτίνα = 2.5 (slider from 1 to 5, step 0.5)
O_1 = Intersect(xAxis, yAxis)
g = Circle(O_1, ακτίνα)
Α = Point(g)
Β = Point(g)
Γ = Point(g)
a: x(Α) * x(Β) - y(Α) * y(Β) + x(Γ) * x(Β) - y(Γ) * y(Β) + x(Α) * x(Γ) - y(Α) * y(Γ)
b: x(Β) + x(Α) + x(Γ)
d: y(Α) + y(Β) + y(Γ)
c: x(Α) * y(Β) + y(Α) * x(Β) + x(Β) * y(Γ) + y(Β) * x(Γ) + x(Α) * y(Γ) + y(Α) * x(Γ)
Ζ: ((a * b + c * d) / (b^(2.0) + d^(2.0)), (-(a) * d + c * b) / (b^(2.0) + d^(2.0)))
A16 = -10
real: (x(Α) + x(Γ)) * ((x(Α) + x(Β)) * (x(Β) + x(Γ)) - (y(Α) - y(Β)) * (y(Β) - y(Γ)) - (y(Γ) - y(Α)) * (y(Α) - y(Β)) * (x(Β) + x(Γ)) + (x(Α) + x(Β)) * (y(Β) - y(Γ)))
Δ: (real, 0.0)
α: x(Α)
β: y(Α)
γ: x(Β)
δ: y(Β)
χ: x(Γ)
ψ: y(Γ)
im: ((α^(3.0) - 3.0 * α * β^(2.0) + γ^(3.0) - 3.0 * γ * δ^(2.0)) * ((β - δ)^(3.0) - 3.0 * (α - γ)^(2.0) * (β - δ)) + (3.0 * α^(2.0) * β - β^(3.0) + 3.0 * γ^(2.0) * δ - δ^(3.0)) * ((α - γ)^(3.0) - 3.0 * (α - γ) * (β - δ^(2.0)))) / ((α - γ)^(2.0) + (β - δ)^(2.0))^(3.0)
Ε: (0.0, im)
Ε': (0.0, -(im))
πολύγ.1, ε', δ_1, ε = Polygon(Δ, Ε, Ε')
e = Line(Β, xAxis)
O = Intersect(yAxis, xAxis)
f = Line(Α, O)
h = false
i = false
κείμενο1: "Α   η εικόνα του u =  " + Α + "
Β   η εικόνα του v =   " + Β + "
Γ   η εικόνα του w=   " + Γ + "
Ζ   η εικόνα του z= (u.v+v.w+w.u)/(u+v+w) =   " + Ζ + "
Δ   η εικόνα του  ( u+v' )(v+w' )(w+u' ) = " + Δ + "
Ε και Ε' οι εικόνες των κλασμάτων = " + Ε + " , " + Ε'