Posición inicial

Ver vectores

Ver recorrido teórico

$v_{0y}:$

v0y: 25
v0x: 0
g: (0, -9.81)
P = PointIn(x ≥ 0 ∧ y ≥ 0)
T(x) = (x - x(P)) / v0x
M = (60, 60)
anima = 0 (slider from 0 to 1, step 0.001)
v = (0, 25)
t0: {0, 0, 0}
t1: {0, 0, 0}
t: ((t1(3) < t0(3)) * 3600) + ((t1(3) - t0(3)) * 60) + t1(2) - t0(2) + (t1(1) - t0(1)) / 1000
dt = 0.8140000000000001
tt = 388
verVectores = true
verArco = false
hAbajo = Segment(P, (x(P), 0))
vx = Vector((x(M), y(P)), (x(M) + v0x, y(P)))
CasillaDeEntrada2 = Textfield(v0y)
vy = Vector((x(P), y(P)), (x(P), y(P) + v0y))
l1: {Segment[M, (x(M), y(P))], Segment[M + v, (x(M + v), y(P))], Segment[(x(M), y(M + v)), (x(M + v), y(M + v))]}
vv = Vector(M, (x(M), y(M + v)))
s: x(P) + (v0x * (v0y + sqrt(v0y^(2) + ((2 * y(P)) * 9.81))) / 9.81)
f(x) = If[T(x) ≥ 0 ∧ (v0x * x) ≤ (v0x * s), If[v0x ≟ 0, 0, y(P) + (v0y * T(x)) - (4.905 * (T(x))^(2))]]
texto1: "Tiempo 
teórico:  " + (round((100 * (v0y + sqrt(((2 * y(P)) * abs(g)) + v0y^(2))) / abs(g))) / 100) + "''

Tiempo 
animación:  " + (round((100 * t)) / 100) + "''"
hArriba = Segment(P, (x(P), y(P) + v0y^(2) / ((2 * abs(g)))))