Как получить сумму x^n/n! в прологе?

Question

Я не очень разбираюсь в Прологе. Мне нужно подсчитать сумму x^n/n! в Prolog, n = 1..k, k и x целые числа Кто-то, пожалуйста, объясните мне, как это сделать с помощью Prolog. Заранее спасибо!

Answer 1

Осуществляя петлю с хвостовой рекурсией вспомогательный предикат с параметрами аккумуляторных:

xsum(K,X,S):- K>=1, zsum(X,1,K,1,0,S). 

zsum(X,I,K,PrevTerm,PrevSum,S):- 
    I=:=K, Term is ________ * X/I, S is _____ + _____. 

zsum(X,I,K,PrevTerm,PrevSum,S):- 
    I < K, Term is ________ * X/I, Sum is _____ + _____, I1 is I+1, 
    zsum(X,I1,K,Term,Sum,S). 

заполнить пробелы. :)

Эти предложения являются взаимоисключающими, поэтому предикат является детерминированным.