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