2013-03-11 35 views
-2

人,帮我用lisp函数。有一个多项式系数列表。这个函数需要计算多项式的值。Lisp中的多项式

Pol (x list) 

例如(Pol 2 '(3 5 2)) => 17

+0

这是一堂课的作业,还是合法的问题? – atconway 2013-03-11 20:34:55

+0

这是一堂课。我解决了很多其他问题,但我无法相信我无法解决这个问题。问题是我们不能使用exp函数。我试图找到另一种解决方案,但递归总是使第一个参数出现问题。 (defun pol(x list)(cond((null list)'0)(t(+(* x(car list))(pol(* xx)(cdr list)))))) (defun polynom x列表)(+(汽车列表)(pol x(cdr列表))))这是我的尝试 – user1973035 2013-03-11 20:45:43

+0

@user,你可以发布你的尝试格式化代码在你的问题? (我们可以尝试从您的评论中复制它,但我们没有希望在没有源的情况下正确缩进它。) – 2013-03-11 20:49:30

回答

1

您需要使用Horner's method

+0

(defun polynom(x list)(cond((null list)'0)(t(+ )(* x(polynom x(cdr list)))))))感谢man的链接。我解决了它。 – user1973035 2013-03-11 21:03:06