Windows Powershell 相当于这个 Linux 命令，它计算一个小数点后 10000 位的数字？

Question

我在社交媒体上看到了这个有趣的小命令，它将 pi 输出到小数点后 10000 位。我想知道与此等效的 Windows Powershell 是什么？

echo "scale=10000; 4*a(1)" | bc -l

我知道我可以使用Powershell Math library 来做基本的数学公式，但是如何将小数位数设置为 10000？

PS C:\Users\Me> [Math]::Atan(1)*4
3.14159265358979

Answer 1

[Math] class 只适用于double，所以很明显你不能获得超过 53 位的精度。它的一些方法还支持decimal，所以你会得到更多的数字，但显然不可能接近 10000 位。 .NET 中没有 arbitrary precision 浮点类型，因此如果您不想从某些存储空间中检索数字，您完全可以自己计算数字

不过，有 BigInteger（PowerShell 类型加速器名称：[bigint]），这很有帮助，因为您不需要自己进行任意精度的数学运算。例如要计算 π 的 10000 位，您可以计算 10000π 并以整数或 fixed point math

进行运算

有many algorithms to do that比如这个：How does this code calculate pi with high precision?

幸运的是Rosetta Code has a sample snippet to calculate π。声明以下函数后，只需调用 Get-Pi 10000 即可获得所需的输出

Function Get-Pi ( $Digits )
    {
    $Big = [bigint[]](0..10)
 
    $ndigits = 0
    $Output = ""
 
    $q = $t = $k = $Big[1]
    $r =           $Big[0]
    $l = $n =      $Big[3]
    # Calculate first digit
    $nr = ( $Big[2] * $q + $r ) * $l
    $nn = ( $q * ( $Big[7] * $k + $Big[2] ) + $r * $l ) / ( $t * $l )
    $q *= $k
    $t *= $l
    $l += $Big[2]
    $k = $k + $Big[1]
    $n = $nn
    $r = $nr
 
    $Output += [string]$n + '.'
    $ndigits++
 
    $nr = $Big[10] * ( $r - $n * $t )
    $n = ( ( $Big[10] * ( 3 * $q + $r ) ) / $t ) - 10 * $n
    $q *= $Big[10]
    $r = $nr
 
    While ( $ndigits -lt $Digits )
        {
        While ( $ndigits % 100 -ne 0 -or -not $Output )
            {
            If ( $Big[4] * $q + $r - $t -lt $n * $t )
                {
                $Output += [string]$n
                $ndigits++
                $nr = $Big[10] * ( $r - $n * $t )
                $n = ( ( $Big[10] * ( 3 * $q + $r ) ) / $t ) - 10 * $n
                $q *= $Big[10]
                $r = $nr
                }
            Else
                {
                $nr = ( $Big[2] * $q + $r ) * $l
                $nn = ( $q * ( $Big[7] * $k + $Big[2] ) + $r * $l ) / ( $t * $l )
                $q *= $k
                $t *= $l
                $l += $Big[2]
                $k = $k + $Big[1]
                $n = $nn
                $r = $nr
                }
            }
        $Output
        $Output = ""
        }
    }