Ε_α

Ε_β

Ε_α_β

Ε_α_β

ΑΘΡΟΙΣΜΑ ΕΜΒΑΔΩΝ ( Ε_α , Ε_β , 2Ε_α_β)

Η ταυτότητα:

$(α+β)^2 = α^2 + 2 α β + β^2 $

ΑΝΤΙΚΑΤΑΣΤΑΣΗ

E_α

Ε_α_β

Ε_β

E_α_+_β

ΥΠΟΛΟΓΙΣΜΟΣ ΕΜΒΑΔΩΝ

Α = (-3, -1)
α = 4 (slider from 1 to 10, step 1)
β = 2 (slider from 1 to 10, step 1)
Β: Α + (α, 0)
Γ: Β + (β, 0)
Δ: Α + (0, α)
Ε: Δ + (0, β)
Ζ: Α + (α, α)
Η: Ζ + (β, β)
c = Segment(Α, Γ)
d = Segment(Α, Ε)
e = Segment(Δ, Ζ)
f = Segment(Ζ, Β)
g = Segment(Ε, Η)
h = OrthogonalLine(Ζ, g)
Θ = Intersect(h, g)
i = Segment(Ζ, Θ)
j = Segment(Η, Γ)
k = OrthogonalLine(Ζ, j)
Ι = Intersect(k, j)
l = Segment(Ζ, Ι)
πολύγ1, ε, θ, ζ, δ = Polygon(Ε, Θ, Ζ, Δ)
πολύγ2, ζ_1, θ_1, η, ι = Polygon(Ζ, Θ, Η, Ι)
πολύγ3, δ_1, ζ_2, β_5, α_3 = Polygon(Δ, Ζ, Β, Α)
πολύγ4, ζ_3, ι_1, γ, β_1 = Polygon(Ζ, Ι, Γ, Β)
πολύγ5, ε_1, η_1, γ_1, α_1 = Polygon(Ε, Η, Γ, Α)
Κείμενοπολύγ5: " " + (LaTeX[πολύγ5]) + ""
κείμενο1: "$(" + (LaTeX[α]) + "+" + (LaTeX[β]) + ")^2$ = $( " + (LaTeX[α]) + ")^2 + 2* " + (LaTeX[α]) + "*" + (LaTeX[β]) + " +(" + (LaTeX[β]) + ")^2$=" + (LaTeX[Κείμενοπολύγ5]) + ""
πολύγ6, ζ_4, θ_2, η_2, ι_2 = Polygon(Ζ, Θ, Η, Ι)
πολύγ7, δ_2, ζ_5, θ_3, ε_2 = Polygon(Δ, Ζ, Θ, Ε)
πολύγ8, ζ_6, ι_3, γ_2, β_2 = Polygon(Ζ, Ι, Γ, Β)
πολύγ9, δ_3, ζ_7, β_3, α_2 = Polygon(Δ, Ζ, Β, Α)
πολύγ10, ζ_8, ι_4, γ_3, β_4 = Polygon(Ζ, Ι, Γ, Β)
πολύγ11, ε_3, θ_4, ζ_9, δ_4 = Polygon(Ε, Θ, Ζ, Δ)
m = false
ab: (α * β)
p(x) = α^(2) + (2 * ab) + β^(2)
Κείμενοπολύγ1: "Ε_α_β = (αβ) = " + (LaTeX[πολύγ1]) + ""
Κείμενοπολύγ4: "Ε_α_β = (αβ) = " + (LaTeX[πολύγ4]) + ""
κείμενο6: "Ε_ (α+β) = $(α+β)^2 = " + (LaTeX[πολύγ5]) + "$"
n = false
o = true
κείμενο7: "(" + (LaTeX[α]) + " + " + (LaTeX[β]) + ")^2  = " + (LaTeX[α]) + "^2 + 2×" + (LaTeX[α]) + "×" + (LaTeX[β]) + " + " + (LaTeX[β]) + "^2 = " + (LaTeX[πολύγ5]) + ""
Κείμενοπολύγ3: "E_α  =  (α)^2  =  " + (LaTeX[πολύγ3]) + ""
Κείμενοπολύγ2: "Ε_β = (β)^2 = " + (LaTeX[πολύγ2]) + ""
a = false
b = false
q = false
r = false
s = false