s = 19107016
T = s Mod 100
RE = 6371.009
Pi = 4 * Atn(1)
omegaE = 2 * Pi / 24
Angle = T * Pi / 180
R = RE * Cos(Angle)
v = R * omegaE
a = R * omegaE ^ 2
MsgBox v
MsgBox a