n = 15108097 k = n Mod 10000 T = n Mod 100 h = 6.62607004 * 10 ^ (-34) ec = 1.60217662 * 10 ^ (-19) em = 9.10938356 * 10 ^ (-31) Voltage = T velovity = Sqr(2 * ec * Voltage / em) p = em * velovity Lambda = h / p MsgBox Lambda