Arithmetic-geometric mean: Difference between revisions

no edit summary
m (→‎{{header|Wren}}: Changed to Wren S/H)
imported>Lacika7
No edit summary
 
Line 600:
==={{header|Minimal BASIC}}===
{{trans|Commodore BASIC}}
{{works with|IS-BASIC}}
<syntaxhighlight lang="qbasic">10 LET A = 1
20 LET G = 1 / SQR(2)
Anonymous user