Distancia a la pantalla (m)

Área proyectada (m²)

Mostrar la tabla de valores

Modificar el ángulo de proyección

Mostrar la gráfica de la función

α = 0.5585053606381855 rad (slider from 0 to 0.46364671579229366, step 0.017453292519943295)
A = (5, 6)
B = (5, -3)
a = Segment(A, B)
b = LineBisector(a)
G = Intersect(a, b)
H = Point(b)
g = Segment(G, H)
C = Point(g)
c = Circle(C, 1.0)
D = Intersect(c, b, 2.0)
D' = Rotate(D, 360.0° - α, C)
d = Ray(C, D')
D'_1 = Rotate(D, α, C)
e = Ray(C, D'_1)
E = Intersect(a, d)
F = Intersect(a, e)
polígono2, f_1, c_1, e_1 = Polygon(C, E, F)
P1: E + (1.0, 0.0)
lado = Distance(E, F)
P2: P1 + (lado, 0.0)
P3: P2 + (0.0, lado)
P4: P1 + (0.0, lado)
polígono1, p1, p2, p3, p4 = Polygon(P1, P2, P3, P4)
listax1 = Sequence(s, s, 0.0, Distance[C, G], 1.0)
listay1 = Sequence(round(100.0 * (2.0 * Element[listax1, s] * tan(α))^(2.0)) / 100.0, s, 1.0, Distance[C, G] + 1.0, 1.0)
I = Midpoint(p1)
J = Midpoint(G, C)
texto1: "d = " + (Distance[C, G]) + " m"
i = false
j = false
k = false
Px: (Distance[C, G] + 6.0, -(3.0))
f = If(x > 6.0 ∧ x < 15.1, 0.1 * 2.0 * tan(α) * (x - 6.0)^(2.0) - 3.0)
Pg: (x(Px), f(x(Px)))
Py: (6.0, f(x(Px)))
m = Segment(Pg, Py)
n = Segment(Pg, Px)
rotulosx = Sequence(Text[s, (s + 5.93, -(3.45))], s, 1.0, 9.0)
ejex = Segment((5.5, -3.0), (15.3, -3.0))
rayadoy = Sequence(Segment[(5.8, s - 3.0), (15.2, s - 3.0)], s, 1.0, 9.0)
rayadox = Sequence(Segment[(s + 6.0, -(3.2)), (s + 6.0, 6.2)], s, 1.0, 9.0)
ejey = Segment((6.0, -3.5), (6.0, 6.2))
rotulosy = Sequence(Text[10.0 * s, (5.4, s - 3.1)], s, 1.0, 9.0)
listadivisionesverticales = Sequence(Segment[(2.0 + s - 0.3, -(5.2)), (2.0 + s - 0.3, -(3.8))], s, 1.0, Distance[C, G] + 2.0)
h = Segment((-1.0, -4.5), (3.7 + Distance[C, G], -(4.5)))
valoresx = Sequence(Text[Element[listax1, s], (2.1 + s, -(4.2))], s, 1.0, Distance[C, G] + 1.0, 1.0)
valoresy = Sequence(Text[Element[listay1, s], (If[10.0 * round(Element[listay1, s]) / 10.0 ≟ Element[listay1, s], 2.1 + s, 1.9 + s], -(4.9))], s, 1.0, round(Distance[C, G]) + 1.0)
texto6 = If(round(10.0 * (2.0 * tan(α))^(2.0)) / 10.0 ≟ 1.0, "y = x²", "y = " + ((2.0 * tan(α))^(2.0)) + " x²")
texto2: "lado = " + (sqrt(polígono1)) + " m"