n = 15108097 k = n Mod 10000 t = n Mod 100 ' g = 10 ' m1 = t * k / n m2 = 2 * k ' m1 = 1 / k m2 = 2 * k ' a = (m2 - m1) * g / (m1 + m2) tt = m1 * (g + a) tt = m2 * (g - a) ' MsgBox a MsgBox tt