Anonymous user
Horner's rule for polynomial evaluation: Difference between revisions
Horner's rule for polynomial evaluation (view source)
Revision as of 21:08, 9 November 2010
, 13 years ago→{{header|PureBasic}}
(Added C#.) |
|||
Line 525:
end;
</lang>
=={{header|Prolog}}==
Tested with SWI-Prolog. Works with other dialects.
<lang Prolog>horner_rule([], _X, 0).
horner_rule([H|T], X, V) :-
horner_rule(T, X, V1),
V is V1 * X + H.
</lang>
Output :
<lang Prolog> ?- horner_rule([-19, 7, -4, 6], 3, V).
V = 128.</lang>
=={{header|PureBasic}}==
|