Escáner de cuerdas proporcionales

Se busca el centro (variable) B1 de la circunferencia de radio fijo r de forma que la circunferencia corte a los lados en cuerdas proporcionales a sus longitudes.

 

Para ello, definimos las constantes:

r = 2

d = Recta[A, B]
f = Recta[B, C]
g = Recta[C, A]
AB = Segmento[A, B]
BC = Segmento[B, C]
CA = Segmento[C, A]

y las variables:

C1 = Circunferencia[B1, r]

D1 = Distancia[Interseca[C1, d, 1], Interseca[C1, d, 2]]
E1 = Distancia[Interseca[C1, f, 1], Interseca[C1, f, 2]]
F1 = Distancia[Interseca[C1, g, 1], Interseca[C1, g, 2]]

Así que el código de color dinámico es:

R = E1 CA / (F1 BC)
G = F1 AB / (D1 CA)
B = D1 BC / (E1 AB)

Pulsa el botón de Reproducción (esquina inferior izquierda) para activar el escáner. (Dependiendo del equipo, el applet puede tardar algunos minutos en cargarse, si tarda mucho descargar el archivo.ggb)

Lo sentimos, el applet de GeoGebra no pudo iniciarse. Por favor, asegúrate que en tu navegador se encuentra instalada y activada la versión 1.4.2 o superior de Java. (Haz clic aquí para instalar Java ahora.)
Un doble clic abre la construcción en una ventana independiente.