How to resolve the algorithm Arithmetic-geometric mean/Calculate Pi step by step in the МК-61/52 programming language
How to resolve the algorithm Arithmetic-geometric mean/Calculate Pi step by step in the МК-61/52 programming language
Table of Contents
Problem Statement
Almkvist Berndt 1988 begins with an investigation of why the agm is such an efficient algorithm, and proves that it converges quadratically. This is an efficient method to calculate
π
{\displaystyle \pi }
. With the same notations used in Arithmetic-geometric mean, we can summarize the paper by writing:
π
4
a g m
( 1 , 1
/
2
)
2
1 −
∑
n
1
∞
2
n + 1
(
a
n
2
−
g
n
2
)
{\displaystyle \pi ={\frac {4;\mathrm {agm} (1,1/{\sqrt {2}})^{2}}{1-\sum \limits {n=1}^{\infty }2^{n+1}(a{n}^{2}-g_{n}^{2})}}}
This allows you to make the approximation, for any large N:
π ≈
4
a
N
2
1 −
∑
k
1
N
2
k + 1
(
a
k
2
−
g
k
2
)
{\displaystyle \pi \approx {\frac {4;a_{N}^{2}}{1-\sum \limits {k=1}^{N}2^{k+1}(a{k}^{2}-g_{k}^{2})}}}
The purpose of this task is to demonstrate how to use this approximation in order to compute a large number of decimals of
π
{\displaystyle \pi }
.
Let's start with the solution:
Step by Step solution about How to resolve the algorithm Arithmetic-geometric mean/Calculate Pi step by step in the МК-61/52 programming language
Source code in the мк-61/52 programming language
3 П0 1 П1 П4 2 КвКор 1/x П2 1
^ 4 / П3 ИП3 ИП1 ИП2 + 2 /
П5 ИП1 - x^2 ИП4 * - П3 ИП1 ИП2
* КвКор П2 ИП5 П1 КИП4 L0 14 ИП1 x^2
ИП3 / С/П
You may also check:How to resolve the algorithm Nth root step by step in the Bracmat programming language
You may also check:How to resolve the algorithm Factors of an integer step by step in the Fortran programming language
You may also check:How to resolve the algorithm Show ASCII table step by step in the VBA programming language
You may also check:How to resolve the algorithm Loops/For step by step in the LiveCode programming language
You may also check:How to resolve the algorithm Decorate-sort-undecorate idiom step by step in the Lua programming language