Golden ratio/Convergence: Difference between revisions
→{{header|Phix}}
(→{{header|Icon}}: Add note about Unicon.) |
|||
Line 899:
<pre>Result: 987/610 (1.618032786) after 14 iterations
The error is approximately -0.000001202</pre>
=={{header|Phix}}==
<!--<syntaxhighlight lang="phix">(phixonline)-->
<span style="color: #008080;">with</span> <span style="color: #008080;">javascript_semantics</span>
<span style="color: #004080;">atom</span> <span style="color: #000000;">Phi</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">1</span><span style="color: #0000FF;">,</span> <span style="color: #000000;">iter</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">0</span>
<span style="color: #008080;">do</span>
<span style="color: #004080;">atom</span> <span style="color: #000000;">Pi</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">Phi</span>
<span style="color: #000000;">Phi</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">1</span><span style="color: #0000FF;">+</span><span style="color: #000000;">1</span><span style="color: #0000FF;">/</span><span style="color: #000000;">Phi</span>
<span style="color: #000000;">iter</span> <span style="color: #0000FF;">+=</span> <span style="color: #000000;">1</span>
<span style="color: #008080;">until</span> <span style="color: #7060A8;">abs</span><span style="color: #0000FF;">(</span><span style="color: #000000;">Phi</span><span style="color: #0000FF;">-</span><span style="color: #000000;">Pi</span><span style="color: #0000FF;">)<</span><span style="color: #000000;">1e-5</span>
<span style="color: #7060A8;">printf</span><span style="color: #0000FF;">(</span><span style="color: #000000;">1</span><span style="color: #0000FF;">,</span><span style="color: #008000;">"Result: %.14f after %d iterations,\nError: %.14f\n"</span><span style="color: #0000FF;">,{</span><span style="color: #000000;">Phi</span><span style="color: #0000FF;">,</span><span style="color: #000000;">iter</span><span style="color: #0000FF;">,</span><span style="color: #000000;">Phi</span><span style="color: #0000FF;">-(</span><span style="color: #000000;">1</span><span style="color: #0000FF;">+</span><span style="color: #7060A8;">sqrt</span><span style="color: #0000FF;">(</span><span style="color: #000000;">5</span><span style="color: #0000FF;">))/</span><span style="color: #000000;">2</span><span style="color: #0000FF;">})</span>
<!--</syntaxhighlight>-->
{{out}}
<pre>
Result: 1.61803278688525 after 14 iterations,
Error: -0.00000120186465
</pre>
=={{header|Prolog}}==
| |||