s = 19107012 T = s Mod 100 a = 4 * Atn(1) * T / 180 g = 10 mu = 1 / T a = g * (Sin(a) - mu * Cos(a)) MsgBox a