Author: Jose Antonio Mora

Mostrar triángulo

Mostrar ecuación

    Pulsa F9 
 para cambiar 
la recta  (al azar)

Mostrar solución

Ocultar solución

Nueva recta

No es correcta

n1 = 3.2 (slider from -5 to 5)
m1 = -1.2 (slider from -5 to 5)
m = -0.4 (slider from -5 to 5, step 0.2)
a1: (4 * Random[-25, 25])
a2: a1 / 20
a: a2
dp: abs(a - m1)
b1: (4 * Random[-25, 25])
b2: b1 / 20
b: b2
n = 3.8 (slider from -5 to 5, step 0.2)
do: abs(b - n1)
ds: do + dp
bt = Random(-5, 5)
c: y = (a * x) + b
d: y = b
f = true
g_1 = true
texto3: "" + (LaTeX[c]) + ""
E = (-4, 3)
F = (-4, 2)
G = (-4, 5)
sol = If(ds ≟ 0, 0, If[ds ≤ 0.8, 2, 1])
H = (-2.788877759012285, 0.5538247859610911)
g = 0 (slider from 0 to 1, step 1)
h: y = (m1 * x) + n1
B1 = If(sol ≟ 0, "Respuesta correcta", If[sol ≟ 1, "Revisa tu respuesta", "Cerca de la solución"])
texto7: "" + B1 + ""
texto2: "" + (LaTeX[h]) + ""
texto9: "Pendiente = " + m1 + ""
texto10: "Ordenada en el origen = " + n1 + ""