n = 15108097 k = n Mod 10000 h = 6.62607004 * 10 ^ (-34) c = 3 * 10 ^ 8 Lambda = 0.05 * k * 10 ^ (-9) E = h * c / Lambda MsgBox E