s = 19107012 L = s Mod 10 T = s Mod 100 k = s Mod 10000 E = s Mod 8 q = s Mod 17 A = s Mod 25 d = (T - L) / 10 Pi = 4 * Atn(1) A = A * Pi / 180 Lambda = L n = d * Sin(A) / Lambda n = Round(n) MsgBox n