Advertisement
Guest User

Untitled

a guest
Sep 16th, 2019
284
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Prolog 0.13 KB | None | 0 0
  1. fib(0, 1).
  2. fib(1, 1).
  3. fib(N, X) :-
  4.     N1 is N - 1,
  5.     N2 is N - 2,
  6.     fib(N1, X1),
  7.     fib(N2, X2),
  8.     X is X1 + X2.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement