h(t)

t

Altura (metros)

INICIA

h_1

h_2

SECANTE

Δh=

Δt

m_S=Δh/Δt

t = 10 (slider from 0 to 10, step 0.1)
h_2(t) = If[0 ≤ t ≤ 10, (((-0.05 * (t - 3)) * ((0.5 * t) - 5)) * ((2 * t) - 7)) + 3]
C = (4, 1)
E = Point(xAxis)
F = Point(xAxis)
c = Ellipse(E, F, C)
A = (1, 10)
B = (9, 10)
D = (4, 9)
d = Ellipse(A, B, D)
f = Line(D, C)
g = OrthogonalLine(A, f)
G, H = Intersect(d, g)
l = OrthogonalLine(E, xAxis)
i = Line(G, l)
j = Line(H, l)
I, J = Intersect(c, j)
K, L = Intersect(c, i)
N: (x(E), y(E) + h_2(t))
O: (x(F), y(F) + h_2(t))
M: (x(C), y(C) + h_2(t))
e = Ellipse(N, O, M)
m = Segment(I, H)
k = Segment(G, K)
P_{1}, Q = Intersect(e, k)
R, S = Intersect(e, m)
c1, p, r_{1}, i_1, k_1 = Polygon(P_{1}, R, I, K)
r: (t, 0)
n = OrthogonalLine(r, xAxis)
P = Intersect(h_2, n)
q = OrthogonalLine(P, n)
U = Intersect(yAxis, q)
T = (-1.02, 1.54)
V = Point(k)
W = Point(k)
Z = (-1.02, 0.82)
c2, t_1, v, w, z_1 = Polygon(T, V, W, Z)
A_1 = Point(m)
B_1 = (11, 1.52)
C_1 = (10.98, 0.8)
D_1 = Point(m)
c3, a_1, b_1, c_1, d_1 = Polygon(A_1, B_1, C_1, D_1)
E_1 = (-0.64, 1.16)
F_1 = (0.4, 1.16)
h = Segment(E_1, F_1)
G_1 = (0.18, 1.42)
H_1 = Point(h)
s = Segment(G_1, H_1)
I_1 = (0.18, 0.9)
a = Segment(I_1, H_1)
E_{2} = (-0.64, 1.16)
F_{2} = (0.4, 1.16)
h_{1} = Segment(E_{2}, F_{2})
H_{2} = Point(h_{1})
E_{3} = (-0.64, 1.16)
F_{3} = (0.4, 1.16)
h_{3} = Segment(E_{3}, F_{3})
H_{3} = Point(h_{3})
E_{4} = (-0.64, 1.16)
F_{4} = (0.4, 1.16)
h_{4} = Segment(E_{4}, F_{4})
H_{4} = Point(h_{4})
J_1 = (9.58, 1.2)
K_1 = (10.6, 1.18)
b = Segment(J_1, K_1)
L_1 = Point(a_1)
f_1 = Segment(K_1, L_1)
M_1 = (10.28, 0.94)
g_1 = Segment(K_1, M_1)
N_1 = Point(h_2)
O_1 = Point(h_2)
j_1 = Line(N_1, O_1)
distanciaJK = Distance(J, K)
Midpoint(J, K)
l_1 = OrthogonalLine(N_1, xAxis)
m_1 = OrthogonalLine(O_1, n)
Q_1 = Intersect(l_1, m_1)
n_1 = Segment(N_1, Q_1)
p_1 = Segment(Q_1, O_1)
m_2 = Slope(j_1)
deltah: y(O_1) - y(N_1)
texto1: "" + deltah + ""