n = 15107086
k = n Mod 10000
T = n Mod 100

remainingmass = n * Exp(-k * T)
halflife = Log(2) / T
MsgBox remainingmass
MsgBox halflife