s = 19107016
T = s Mod 100
v0 = T
g = 10
Pi = 4 * Atn(1)
A = T * Pi / 180
x0 = 0
y0 = 0
x = x0 + T * v0 * Cos(A)
y = y0 + T * v0 * Sin(A) - g * T / 2
MsgBox x
MsgBox y
xmax = v0 ^ 2 * Sin(2 * A) / g
ymax = v0 ^ 2 * (Sin(A)) ^ 2 / (2 * g)
MsgBox xmax
MsgBox ymax