busca_punot
Author: Rafael Losada Liste

Nuevo reto

P = (-3.5, 6.5)
b = 3
a = 4
T1: "¡Muy bien! Este es el punto (" + a + ", " + b + ")"
T2: "Busca el punto (" + a + ", " + b + ")"
lista2 = Sequence(Line[(0, k), (1, k)], k, -20, 15)
lista1 = Sequence(Line[(k, 0), (k, 1)], k, -15, 60)
aciertos = 0
lista3: {Segment[P, (x(P), 0)], Segment[P, (0, y(P))]}
acierto = If(x(P) ≟ a ∧ y(P) ≟ b, 1, 0)
retos = 0
textoRetos = If(retos ≟ 1, "reto", "retos")
textoAciertos = If(aciertos ≟ 1, "acierto", "aciertos")
T3: "Llevas " + aciertos + " " + textoAciertos + " de " + retos + " " + textoRetos + "."