Сумма ряда. Рекурсия - Prolog

Формулировка задачи:

Здравствуйте. Есть задача: Решается рекурсивным методом в SWI-Prolog 6.0.1 Написал следующий код:
fun(1,1).
fun(N,S):-F is N-1,fun(F,S1),
S is (S1+N^2)/5.
При вводимых данных fun(5,S). ответ по идее должен быть S = 11, но на деле получается S = 5.720000000000001 Укажите пожалуйста на мою ошибку, только только начал заниматься прологом и как-то встрял на элементарной задаче.

Код к задаче: «Сумма ряда. Рекурсия - Prolog»

textual
?- fun(5, f(I^2/5, I), S).
I = 5,
S = 11.0.

14   голосов, оценка 3.286 из 5


СОХРАНИТЬ ССЫЛКУ