Mathematica对于输出的数值有比较好的小数点保留位数的函数——NumberForm，使用方法：

  NumberForm[exp, {Infinity,n}]

解释：exp为数值结果，n为保留的小数点位数。 例子如下：

  NumberForm[3.141596, {Infinity,5}]

结果为：

 3.14160