Eixo maior na horizontal

Eixo Maior

Distância Focal

Eixo Menor

x_{C} = 1
y_{C} = 1
C: (x_{C}, y_{C})
EixoMaior = 8 (slider from 0 to 10, step 0.1)
EixoMenor = 6 (slider from 0 to 10, step 0.1)
Emh = true
A_{1} = If(Emh ≟ true, C - (EixoMaior / 2, 0), C + (0, EixoMaior / 2))
A_{2} = If(Emh ≟ true, C + (EixoMaior / 2, 0), C - (0, EixoMaior / 2))
B_{1} = If(Emh ≟ true, C + (0, EixoMenor / 2), C - (EixoMenor / 2, 0))
B_{2} = If(Emh ≟ true, C - (0, EixoMenor / 2), C + (EixoMenor / 2, 0))
DistFocal: (sqrt((EixoMaior / 2)^(2) - (EixoMenor / 2)^(2)) * 2)
F_{1} = If(Emh ≟ true, C - (DistFocal / 2, 0), C + (0, DistFocal / 2))
F_{2} = If(Emh ≟ true, C + (DistFocal / 2, 0), C - (0, DistFocal / 2))
λ = Ellipse(F_{1}, F_{2}, EixoMaior / 2)
Doisc = Segment(F_{1}, F_{2})
Doisa = Segment(A_{1}, A_{2})
Doisb = Segment(B_{1}, B_{2})
e = true
g = false
f = false
texto1: "Excentricidade = \frac{c}{a}=\frac{" + (LaTeX[Doisc / 2]) + "}{" + LaTeX[Doisa / 2] + "}= " + LaTeX[Doisc / Doisa] + ""
a = Segment(A_{1}, A_{2})
b = Segment(B_{1}, B_{2})
texto21: "Equação:\frac{(x-x_{C})^2}{a^2}+\frac{(y-y_{C})^2}{b^2}=1⇒\frac{(x-" + (LaTeX[x_{C}]) + ")^2}{" + LaTeX[(Doisa / 2)^(2)] + "}+\frac{(y-" + LaTeX[y_{C}] + ")^2}{" + LaTeX[(Doisb / 2)^(2)] + "}=1"
texto22: "Equação:\frac{(x-x_{C})^2}{a^2}+\frac{(y-y_{C})^2}{b^2}=1⇒\frac{(x-" + (LaTeX[x_{C}]) + ")^2}{" + LaTeX[(Doisa / 2)^(2)] + "}+\frac{(y+" + LaTeX[(-y_{C})] + ")^2}{" + LaTeX[(Doisb / 2)^(2)] + "}=1"
texto23: "Equação:\frac{(x-x_{C})^2}{a^2}+\frac{(y-y_{C})^2}{b^2}=1⇒\frac{(x+" + (LaTeX[(-x_{C})]) + ")^2}{" + LaTeX[(Doisa / 2)^(2)] + "}+\frac{(y-" + LaTeX[y_{C}] + ")^2}{" + LaTeX[(Doisb / 2)^(2)] + "}=1"
texto24: "Equação:\frac{(x-x_{C})^2}{a^2}+\frac{(y-y_{C})^2}{b^2}=1⇒\frac{(x+" + (LaTeX[(-x_{C})]) + ")^2}{" + LaTeX[(Doisa / 2)^(2)] + "}+\frac{(y+" + LaTeX[(-y_{C})] + ")^2}{" + LaTeX[(Doisb / 2)^(2)] + "}=1"
texto31: "Equação:\frac{(x-x_{C})^2}{b^2}+\frac{(y-y_{C})^2}{a^2}=1⇒\frac{(x-" + (LaTeX[x_{C}]) + ")^2}{" + LaTeX[(Doisb / 2)^(2)] + "}+\frac{(y-" + LaTeX[y_{C}] + ")^2}{" + LaTeX[(Doisa / 2)^(2)] + "}=1"
texto34: "Equação:\frac{(x-x_{C})^2}{b^2}+\frac{(y-y_{C})^2}{a^2}=1⇒\frac{(x+" + (LaTeX[(-x_{C})]) + ")^2}{" + LaTeX[(Doisb / 2)^(2)] + "}+\frac{(y+" + LaTeX[(-y_{C})] + ")^2}{" + LaTeX[(Doisa / 2)^(2)] + "}=1"
texto33: "Equação:\frac{(x-x_{C})^2}{b^2}+\frac{(y-y_{C})^2}{a^2}=1⇒\frac{(x+" + (LaTeX[(-x_{C})]) + ")^2}{" + LaTeX[(Doisb / 2)^(2)] + "}+\frac{(y-" + LaTeX[y_{C}] + ")^2}{" + LaTeX[(Doisa / 2)^(2)] + "}=1"
texto32: "Equação:\frac{(x-x_{C})^2}{b^2}+\frac{(y-y_{C})^2}{a^2}=1⇒\frac{(x-" + (LaTeX[x_{C}]) + ")^2}{" + LaTeX[(Doisb / 2)^(2)] + "}+\frac{(y+" + LaTeX[(-y_{C})] + ")^2}{" + LaTeX[(Doisa / 2)^(2)] + "}=1"