Horner's rule for polynomial evaluation: Difference between revisions

m
Line 442:
=={{header|Elena}}==
{{trans|C#}}
ELENA 3.34 :
<lang elena>import extensions.
import system'routines.
horner = (:coefficients:,variable)
[
^ coefficients clone; sequenceReverse; accumulate(Real new) with(:accumulator:coefficient)(accumulator * variable + coefficient)
].
programpublic =program
[
console printLine(horner((-19.0r, 7.0r, -4.0r, 6.0r), 3.0r)).
].</lang>
{{out}}
<pre>
Anonymous user