a

¡Mueve el lorito con este deslizador!

bb = -3 (slider from -4 to 5, step 1)
aa = 5 (slider from -4 to 5, step 1)
b: round(bb)
t = 0 (slider from 0 to 2, step 0.01)
a: round(aa)
A: (a + b, 0.0)
A1: A
A2: A
A3: A
u = Vector((0.0, -2.0), (a, -(2.0)))
texto1: "" + a
texto2: "" + b
c = Segment((0.0, 0.0), (0.0, -2.0))
d = Segment((a, -(2.0)), (a, -(3.0)))
e = Segment(A, (a + b, -(3.0)))
v = Vector((a, -(3.0)), (a + b, -(3.0)))
B = If(t < 1.0, (a * t, 0.0), (a + (t - 1.0) * b, 0.0))
r = 1.74
w = Vector(B)
texto4: "\fgcolor{0000ff}{" + a + "}\,+\," + "\fgcolor{cc00cc}{" + (If[b < 0.0, "(" + b + ")", b + ""]) + "}\,=\," + (If[a + b > 0.0, "\fgcolor{00cb65}{", If[a + b ≟ 0.0, "\fgcolor{aaaaaa}{", "\fgcolor{ff0000}{"]]) + (a + b) + "}"
lista1 = Sequence(Translate[rama, Vector[(0.0, 0.0), (s * r, 0.0)]], s, -7.0, 8.0)
texto5: "a = " + a
texto6: "b = " + b