Friday, December 3, 2010

Factorial

fact(0,1).
fact(N,R):-N >0,N1 is N-1,fact(N1,R1),R is N*R1.
Posted by Singha Anu at 9:00 AM

2 comments:

Subscribe to: Post Comments (Atom)