Anonymous user
Horner's rule for polynomial evaluation: Difference between revisions
Horner's rule for polynomial evaluation (view source)
Revision as of 18:00, 9 May 2010
, 14 years ago→{{header|Scheme}}: ++ smalltalk
(→{{header|Clojure}}: ++ C) |
(→{{header|Scheme}}: ++ smalltalk) |
||
Line 263:
Output:
<lang>128</lang>
=={{header|Smalltalk}}==
{{works with|GNU Smalltalk}}
<lang smalltalk>OrderedCollection extend [
horner: aValue [
^ self reverse inject: 0 into: [:acc :c | acc * aValue + c].
]
].
(#(-19 7 -4 6) asOrderedCollection horner: 3) displayNl.</lang>
=={{header|Tcl}}==
| |||