m =

Ayuda

Más ayuda

d

m = 0.25 (slider from -5 to 5, step 0.1)
n = 5 (slider from -5 to 10, step 0.1)
a: y = (m * x) + n
P = (8, 5)
pasa: (m * x(P)) + n ≟ y(P)
signo = If(pasa, " = ", " ≠ ")
texto1: "" + (y(P)) + "" + signo + "" + m + " * " + (x(P)) + " + " + n + " = " + ((x(P) * m) + n) + ""
CasillaDeEntrada1 = Textfield(m)
lista1 = Sequence(If[floor((m * i) + n) ≟ (m * i) + n, (i, (m * i) + n)], i, -10, 25)
lista2 = RemoveUndefined(lista1)
d: Element[lista2, 2] - Element[lista2, 1]
b = false
escalera = Sequence(Polygon[Element[lista2, i], Element[lista2, i + 1], (x(Element[lista2, i + 1]), y(Element[lista2, i]))], i, 1, Length[lista2])
c = false
texto2: "d = " + d
texto3: "P" + P + ""