' rational integral: Simpson's rule of numerical calculation of integral
n = 15107096
k = n Mod 10000
T = n Mod 100
a = 0
b = k
rational_integral = 0
MsgBox rational_integral