Доброго времени суток. Получил задание - посчитать сумму ряда. Ну, думаю, все просто. Ряд 3.14*n!. Взял рекурсивную функцию расчета факториала, объявляю стандартную конструкцию цикла со счетчиком, получаю ошибку «unbound function - I». Саму конструкцию взял с мануала. ЧЯДНТ?
(defun fact (n)
(
if (zerop n)
3.14
(* n (fact (1- n)))
)
)
(defun sum (n)
(
loop for i from 1 to n
summing (fact (i))
)
)
