Arithmetic-geometric mean/Calculate Pi: Difference between revisions
Arithmetic-geometric mean/Calculate Pi (view source)
Revision as of 07:32, 21 October 2022
, 1 year ago→{{header|Pascal}}: cosmetic
(→{{header|Raku}}: simplification) |
m (→{{header|Pascal}}: cosmetic) |
||
Line 1,091:
The program expects as an input parameter the required number of decimal digits of '''''π''''' (32 ≤ N ≤ 1000000), default is 256 digits.
<syntaxhighlight lang="pascal">
program
{$mode objfpc}{$h+}{$warn 5091 off}
uses
| |||