怎么用Mathematica调整数字的输出精度？

1、把一个小数的小数点后面的位数补充到20位，不足的用0顶位。

1/3``20

0.3``20

2、Pi``20

这个代码不执行，说明对于特定常数不实用。

3、那么怎么求出Pi的100位精度呢：

N[Pi,100]

4、用Accuracy给出数字的精度：

Accuracy [N[Pi,100] ]Accuracy [Pi]

5、对于正整数和特定的符号常数，精度都是无限大，而对于小数就不会这样:

Accuracy [E ]Accuracy [3 ]Accuracy [3.]Accuracy [3.``20]

6、不过，Accuracy[3.]的结果为什么是15.4775？

Table[Accuracy [N[Pi,n]],{n,1,10,1}]

7、FindRoot[x-Sqrt[2],{x,1}, WorkingPrecision -> 60]N[Sqrt[2],60]

这是两种把Sqrt[2]的精度提高到60的方法，结果的精度完全一样。

8、计算椭圆{3 Cos[x],2 Sin[x]}的周长：

N[ArcLength[{3 Cos[x],2 Sin[x]},{x,0,2 Pi}],100]