n = 15108097 k = n Mod 10000 T = n Mod 100 power = T * 10 ^ 3 resistance = 0.1 * T voltage = 0.03 * k voltage = n current = power / voltage Losses = resistance * current ^ 2 MsgBox Losses