Arithmetic-geometric mean: Difference between revisions
Content added Content deleted
Line 969:
=={{header|LiveCode}}==
Livecode has a built-in geometric mean method
<lang LiveCode>geometricMean(
However in the spirit of the exercise
<lang LiveCode>function agm aa,g
put abs(aa-g) into absdiff
put (aa+g)/2 into aan
put sqrt(aa*g) into gn
repeat while abs(aan - gn) < absdiff
put abs(aa-g) into absdiff
put (aa+g)/2 into aan
put sqrt(aa*g) into gn
put aan into aa
put gn into g
end repeat
return aa
end agm</lang>
Example
<lang LiveCode>put agm(1, 1/sqrt(2))
-- ouput
-- 0.847213</lang>
=={{header|Logo}}==
| |||