Horner's rule for polynomial evaluation: Difference between revisions
Content added Content deleted
(added version in the fsyntax extension for Ciao) |
|||
Line 1,249: | Line 1,249: | ||
{{out}} |
{{out}} |
||
<pre>-0.999999999924349-5.28918515954219e-10i</pre> |
<pre>-0.999999999924349-5.28918515954219e-10i</pre> |
||
=={{header|Phix}}== |
|||
<lang Phix>function horner(atom x, sequence coeff) |
|||
atom res = 0 |
|||
for i=length(coeff) to 1 by -1 do |
|||
res = res*x + coeff[i] |
|||
end for |
|||
return res |
|||
end function |
|||
?horner(3,{-19, 7, -4, 6})</lang> |
|||
{{out}} |
|||
<pre> |
|||
128 |
|||
</pre> |
|||
=={{header|PHP}}== |
=={{header|PHP}}== |