n = 15108099
k = n Mod 10000
T = n Mod 100
m = n Mod 35
a = n Mod 25
L = n Mod 10

pi = 4 * Atn(1)

g = 10

x = 2 - 1 / k
y = 0.5 + 1 / n + 0.03


MsgBox "minimum direct hit velocity is:"
v = 6.95239855
'v = 7
MsgBox v
MsgBox "meters per second"

MsgBox " because "
a = g * x ^ 2 / 2 / v ^ 2
b = -x
c = g * x ^ 2 / 2 / v ^ 2 + y
c = a + y
N1 = (-b - Sqr(b ^ 2 - 4 * a * c)) / (2 * a)
aN1 = Atn(N1)

MsgBox "half of x_ maximum is:"


half_of_x_max1 = v ^ 2 * Sin(2 * aN1) / (2 * g)
MsgBox half_of_x_max1


MsgBox "meters"

y_max1 = v ^ 2 * (Sin(aN1)) ^ 2 / (2 * g)
'MsgBox y_max1