Anonymous user
Arithmetic-geometric mean: Difference between revisions
+ МК-61
m (→{{header|REXX}}: removed duplicate "the the". -- ~~~~) |
(+ МК-61) |
||
Line 501:
agm(1, 1/sqrt(2)), bfloat, fpprec: 85;
/* 8.472130847939790866064991234821916364814459103269421850605793726597340048341347597232b-1 */</lang>
=={{header|МК-61/52}}==
<lang>П1 <-> П0 1 ВП 8 /-/ П2 ИП0 ИП1
- ИП2 - /-/ x<0 31 ИП1 П3 ИП0 ИП1
* КвКор П1 ИП0 ИП3 + 2 / П0 БП
08 ИП0 С/П</lang>
=={{header|NetRexx}}==
| |||