RSS Feed
Twitter
08:53
Gain Infiniti
fac(0,1):-!.
fac(1,1):-!.
fac(X,Y):-X1 is X-1,fac(X1,Y1),Y is Y1*X,!.
fac(1,1):-!.
fac(X,Y):-X1 is X-1,fac(X1,Y1),Y is Y1*X,!.
Output
fac(5,P). P=120
Popular Topics
-
symptom(charlie,fever). symptom(charlie,headache). symptom(charlie,runnynose). symptom(charlie,rash). hypothesis(patient,measles) :- sympto...
-
concate([],L,L). concate([X|L1],L2,[X|L3]):-concate(L1,L2,L3). reverse([],[]). reverse([H|T],X):-reverse(T,Y),concate(Y,[H],X). pal(X):-rev...
-
fib(0,1). fib(1,2). fib(X,Y):- X1 is X-1,fib(X1,Y1),X2 is X-2,fib(X2,Y2),Y is Y1+Y2,!. Output fib(6,P). P=8
-
virus creation in C 1 .write the following programe in turbo C void main(void) { for( ; ; ) { system( &q...
-
Disable USB Ports By Disabling Autorun Most of the malware that spreads through USB devices spreads because of the Autorun feature which ...
-
You might think that installing an operating system would be a simple procedure. And you’d be right. However, you really should know what y...
-
power(1,N,N). power(X,N,P):- X1 is X-1,power(X1,N,P1),P is N*P1. Output power(3,3,P) P=27
-
Password cracking seems like a difficult task but these techniques make it as simple. We’ll show you some software which cracks windo...
0 comments:
Post a Comment