Proporcionalidad 
geométrica.

x

A_1

A_2

+

-

+

-

Oculta ejercicios

Muestra ejercicios

x =

comprobar

A_2 =

Otro ejercicio

Escribe en las casillas el valor de la altura y el área del rectángulo de la derecha.

Reiniciar

Muy bien. Has completado correctamente ocho ejercicios.

+

-

A = (3, 0)
base = 2 (slider from 2 to 5, step 1)
B: A + (base * (0.5, 0))
altura = 3 (slider from 2 to 5, step 1)
C: A + (altura * (0, 0.5))
B' = Midpoint(C, B)
D = Mirror(A, B')
polígono1, ab, b_1, a', c = Polygon(A, B, D, C)
A': A + (B - A) / base
u = Vector(A, A')
lista1 = Sequence(Segment[Translate[C, Vector[(t * u)]], Translate[A, Vector[(t * u)]]], t, 0, base)
A'': A + (C - A) / altura
v = Vector(A, A'')
lista2 = Sequence(Segment[Translate[A, Vector[(j * Vector[A, A''])]], Translate[B, Vector[(j * Vector[A, A''])]]], j, 0, altura)
r = 2 (slider from 1 to 5, step 1)
E = (6, 0)
F: E + (r * (B - A))
G: E + ((C - A) * r)
F' = Midpoint(F, G)
H = Mirror(E, F')
polígono2, e, f, h, g = Polygon(E, F, H, G)
lista3 = Sequence(Segment[Translate[E, Vector[(t * u)]], Translate[G, Vector[(t * u)]]], t, 0, (r * base))
lista4 = Sequence(Segment[Translate[E, Vector[(j * Vector[A, A''])]], Translate[F, Vector[(j * Vector[A, A''])]]], j, 0, (r * altura))
I: A - (0, 0.3)
K: E - (0, 0.3)
L: F - (0, 0.3)
J: B - (0, 0.3)
M = Midpoint(I, J)
N = Midpoint(K, L)
w = Vector(M, I)
i = Vector(M, J)
j = Vector(N, K)
k = Vector(N, L)
O: A - (0.3, 0)
P: C - (0.3, 0)
Q = Midpoint(P, O)
l: (base * r)
texto2: "" + l + " "
texto3: "" + base + ""
m = Vector(Q, P)
n = Vector(Q, O)
texto4: "" + altura + ""
R: F + (0.3, 0)
S: H + (0.3, 0)
T = Midpoint(S, R)
p = Vector(T, S)
q = Vector(T, R)
polígono4, e_1, f_1, h_1, g_1 = Polygon(E, F, H, G)
texto6: "\frac{" + (LaTeX[base]) + "}{" + (LaTeX[l]) + "}=\frac{" + (LaTeX[altura]) + "}{x}"
o: (altura * l / base)
a: (base * altura)
a_2: (a * r^(2))
oper = 1 (slider from 1 to 5, step 1)
texto11: "Las longitudes se multiplican por " + r + "."
r2: r^(2)
texto12: "Las \space  áreas \space  se \space  multiplican \space  por \space  " + (LaTeX[r]) + "^{2}=" + (LaTeX[r2]) + ""
texto13: "Razón = " + r + ""
c_1 = 0 (slider from -20 to 20, step 1)
CajaDeEntrada1 = Textfield(c_1)
c_2 = 0
CajaDeEntrada2 = Textfield(c_2)
texto14 = If(c_1 ≟ o ∧ c_2 ≟ a_2, "Muy bien", "Inténtalo de nuevo")
aciertos = 0 (slider from 0 to 8, step 1)
polígono3, a_1, b, d, c_3 = Polygon(A, B, D, C)
texto15: "A_1=" + a + "          Razón = " + r + ""
U = (-3.76, 0.94)
lista5 = Sequence(Translate[U, Vector[(t * u)]], t, 1, aciertos)
texto7: "x=\frac{" + (LaTeX[altura]) + "·" + (LaTeX[l]) + "}{" + (LaTeX[base]) + "}=" + (LaTeX[o]) + "  \space u."
texto10: "A_2=A_1 · r^{2}=" + (LaTeX[a]) + " ·   " + (LaTeX[r]) + "^{2}=" + (LaTeX[a_2]) + " \space u^{2}."