a

a^2

(a+b) (a-b)

- \;  b^2

Valores

a

=

-  b

Inicia la animación

Animación

Ver cálculos

Ocultar cálculos

Transición de
la animación

+ b

Detiene animación

a = 5 (slider from 2 to 5.5, step 0.1)
ax: (a, 0)
ay: (0, a)
o = 13.363 (slider from 0 to 15, step 0.001)
o6 = Max(0, Min[1, o - 10])
o4 = Max(0, Min[1, o - 8])
o2 = Max(0, Min[1, o - 4])
o1 = Max(0, Min[1, o - 2])
b = 2 (slider from 0.5 to a - 0.5, step 0.1)
bx: (b, 0)
by: (0, b)
A = (0, 7)
A1: A + (0, 1)
A2: A1 + (o1 * ax)
B1: A - (1, 0)
B2: B1 - (o1 * ay)
B3: B2 + (o2 * by)
B = (-2, 9)
C = (11, 9)
j = Line(B, C)
p = Line(B3, j)
m = Line(B2, j)
k = OrthogonalLine(A, j)
n = Line(A2, k)
K = Intersect(n, p)
K' = Translate(K, Vector[((ax - bx) * o4)])
K'' = Rotate(K', (o6 * π / 2), K)
E = Intersect(m, n)
E' = Translate(E, Vector[((ax - bx) * o4)])
E'' = Rotate(E', (o6 * π / 2), K)
G = Intersect(k, p)
F = Intersect(k, m)
c = Circle(F, G)
H, I = Intersect(c, m)
I' = Translate(I, Vector[((ax - bx) * o4)])
I'' = Rotate(I', (o6 * π / 2), K)
q = OrthogonalLine(I, m)
J = Intersect(q, p)
J' = Translate(J, Vector[((ax - bx) * o4)])
J''_1 = Rotate(J', (o6 * π / 2), K)
o3 = Max(0, Min[1, o - 6])
J'': J' + ((o3 * (a - b)), 0)
r = OrthogonalLine(J'', p)
L = Intersect(m, r)
v = 0 (slider from 0 to 10, step 0.001)
b2: b^(2)
a2: a^(2)
ab: (a * b)
amb: a - b
w = 0 (slider from 0 to 5, step 1)
nada = 4.8 (slider from -5 to 5, step 0.1)
o8 = Max(0, Min[1, o - 8])
texto1: "b^2= " + (LaTeX[b]) + "^2= " + (LaTeX[b2]) + ""
texto2: "a^2 =" + (LaTeX[a]) + "^2 =" + (LaTeX[a2]) + ""
amab: a + b
amm: (amab * amb)
a2mb2: a^(2) - b^(2)
texto5: "a+b= " + (LaTeX[a]) + "+" + (LaTeX[b]) + "=" + (LaTeX[amab]) + ""
texto7: "a-b=" + (LaTeX[a]) + "-" + (LaTeX[b]) + "=" + (LaTeX[amb]) + ""
A3: A2 + (o2 * bx)
f = Segment(B1, B2)
g = Segment(A1, A2)
h = Segment(A2, A3)
i = Segment(B3, B2)
l = Line(A, j)
D = Intersect(l, n)
polígono1, a_1, d, e, f_1 = Polygon(A, D, E, F)
polígono2, f_2, i_1, j_1, g_1 = Polygon(F, I, J, G)
polígono3, i_2, j_2, k_1, e_1 = Polygon(I, J, K, E)
polígono5, m_1, n_1, p_1, q_1 = Polygon(I'', J''_1, K'', E'')
polígono4, s, t, h_1, l_1 = Polygon(I', J', J'', L)
I''_1 = Rotate(I', (o6 * π / 2), K)
K''_1 = Rotate(K', (o6 * π / 2), K)
E''_1 = Rotate(E', (o6 * π / 2), K)
polígono6, i''_1, j''_1, k''_1, e''_1 = Polygon(I''_1, J''_1, K''_1, E''_1)
polígono0 = PolyLine(A, D, K, G)
o0 = Max(0, Min[1, o])
polígono7, a_2, g_2, k_2, d_1 = Polygon(A, G, K, D)
texto4: "(a+b) (a-b) = " + (LaTeX[amab]) + " * " + (LaTeX[amb]) + "=" + (LaTeX[amm]) + ""
u = 2 (slider from 0 to 4, step 1)
texto3: "a^2-b^2 = " + (LaTeX[a2]) + "-" + (LaTeX[b2]) + "=" + (LaTeX[a2mb2]) + ""
texto14: "a=" + a + ""
texto17: "b = " + b + ""
texto20: "Velocidad  de la animación = " + u + ""
b_1 = -3 (slider from -5 to 5, step 0.1)
nn = 1 (slider from 0 to 1, step 1)