1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20# Q. Write a PROLOG program to determine the n-th Fibonacci number ## Code fib(0,1). fib(1,1). fib(N,F):- N > 1, N1 is N - 1, N2 is N - 2, fib(N1,F1), fib(N2,F2), F is F1 + F2. ## Query fib(5,F).
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
# Q. Write a PROLOG program to determine the n-th Fibonacci number ## Code fib(0,1). fib(1,1). fib(N,F):- N > 1, N1 is N - 1, N2 is N - 2, fib(N1,F1), fib(N2,F2), F is F1 + F2. ## Query fib(5,F).