Рекурсия: найти n-ое число Фибоначчи второго порядка - Prolog

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

Составить программу вычисления u_n для данного неотрицательного целого n. Числа Фибоначчи второго порядка u₀, u₁, u₂,… определяются следующим образом система:U₀=1 U₁=1 U₂=3 U_n=U_n-1+U_n-2+U_n-3

Решение задачи: «Рекурсия: найти n-ое число Фибоначчи второго порядка»

textual
                            Листинг программы 
                        
 
                        
                          
                    
domains
int=integer
 
predicates
fib(int,int,int,int,int)
 
clauses
fib(PP,_,_,1,PP) :- !.
fib(_,P,_,1,P) :- !.
fib(_,_,C,3,C) :- !.
fib(PP,P,C,N,Q) :- N1=N-1, CC=PP+P+C, fib(P,C,CC,N1,Q).

Оцени полезность:

6 голосов , оценка 4.333 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы