a

a^2

(a+b) (a-b)

- b^2

Valores

a

=

+b

-b

Inicia animación

Animación

Ver cálculos

Ocultar cálculos

Detiene animación

    Transición 
de la animación

a = 6 (slider from 2 to 6, step 0.1)
o = 9.224 (slider from 0 to 12, step 0.001)
o4 = Max(0, Min[1, o - 4])
A = (0, 7)
B: A + (a, 0)
b = 2 (slider from 0.5 to a - 0.5, step 0.1)
D: A - (0, a - b)
E: D + (b, 0)
l = LineBisector(E, B)
L = Point(l)
t = CircleArc(L, B, E)
S1: B + (o4 * (E - B))
a_1 = Ray(L, S1)
F: E + (a, 0)
G = Point(l)
m = Ray(G, S1)
p = CircleArc(G, E, B)
K = Intersect(t, a_1, 1)
K' = Mirror(K, l)
F' = Mirror(F, l)
r = CircleArc(G, F', F)
S2: F + (o4 * (F' - F))
s = Ray(G, S2)
H = Intersect(r, s, 1)
C: B + (b, 0)
C' = Mirror(C, l)
S3: C + (o4 * (C' - C))
n = Ray(G, S3)
q = CircleArc(G, C', C)
J = Intersect(q, n)
I = Intersect(q, m, 1)
o2 = Max(0, Min[0.5, o - 2])
o1 = Max(0, Min[0.5, o - 0.5])
PD1: D + ((2 * o2) * (E - D))
v = 0 (slider from 0 to 10, step 0.001)
b2: b^(2)
a2: a^(2)
ab: (a * b)
amb: a - b
nada = 3.2 (slider from -5 to 5, step 0.1)
w = If(o ≥ 0 ∧ o < 1, 1, If[o ≥ 8 ∧ o < 9, 1, If[o ≥ 6 ∧ o < 7, 1, If[o ≥ 4 ∧ o < 5, 1, If[o ≥ 2 ∧ o < 3, 1, 0]]]])
o6 = Max(0, Min[1, o - 6])
o8 = Max(0, Min[1, o - 8])
W = (0.26, 4.64)
texto1: "b^2= " + (LaTeX[b]) + "^2= " + (LaTeX[b2]) + ""
o0 = Max(0, Min[0.5, o])
texto2: "a^2 =" + (LaTeX[a]) + "^2 =" + (LaTeX[a2]) + ""
PA: A + ((2 * o0) * (B - A))
PD: D + ((2 * o0) * (E - D))
PA1: A + ((2 * o2) * (B - A))
polígono1, d, e, f, g = Polygon(A, D, PD1, PA1)
c = Segment(A + (0, 0.5), PA + (0, 0.5))
B1: A - (0, a)
PAB1: A + ((2 * o0) * (B1 - A))
c1 = Segment(A + (-0.5, 0), PAB1 + (-0.5, 0))
PB: B + ((2 * o1) * (C - B))
c2 = Segment(B + (0, 0.5), PB + (0, 0.5))
PAB2: B1 + (2 * (o1 * (D - B1)))
c3 = Segment(B1 + (-0.5, 0), PAB2 + (-0.5, 0))
o3 = Max(0, Min[0.5, o - 2.5])
PBC1: B + ((2 * o3) * (C - B))
PEF1: E + ((2 * o3) * (F - E))
polígono2, h, i, j, k = Polygon(B, E, PEF1, PBC1)
I' = Mirror(I, l)
polígono3, k_1, j_1, h_1, k' = Polygon(K, J, H, K')
T1: A + (o6 * (B1 - A))
T2: T1 + (a, 0)
M = Point(d)
polígono4, b_1, c_1, d_1, e_1 = Polygon(A, T1, T2, B)
T3: B1 + (o8 * (D - B1))
T4: T3 + (b, 0)
N = (0.02, 1)
O = (5.2, 1)
polígono5, f_1, g_1, i_1, l_1 = Polygon(PAB1, J, T4, T3)
c54 = Segment(B1 + (-0.5, 0), PAB2 + (-0.5, 0))
u = 1 (slider from 0 to 1, step 0.1)
amab: a + b
amm: (amab * amb)
texto4: "(" + (LaTeX[a]) + "+" + (LaTeX[b]) + ") (" + (LaTeX[a]) + "-" + (LaTeX[b]) + ") = " + (LaTeX[amab]) + " * " + (LaTeX[amb]) + "=" + (LaTeX[amm]) + ""
a2mb2: a^(2) - b^(2)
texto3: "" + (LaTeX[a]) + "^2-" + (LaTeX[b]) + "^2 = " + (LaTeX[a2]) + "-" + (LaTeX[b2]) + "=" + (LaTeX[a2mb2]) + ""
texto5: "a+b= " + (LaTeX[a]) + "+" + (LaTeX[b]) + "=" + (LaTeX[amab]) + ""
texto7: "a-b=" + (LaTeX[a]) + "-" + (LaTeX[b]) + "=" + (LaTeX[amb]) + ""
B' = Mirror(B, l)
E' = Mirror(E, l)
PEF1' = Mirror(PEF1, l)
PBC1' = Mirror(PBC1, l)
p3, b', e', pef1', pbc1' = Polygon(B', E', PEF1', PBC1')