PORTABLE Finding Expected Value By Forward Method By Mathematica – interpolation