RSS Feed
Twitter
08:51
Gain Infiniti
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):-reverse(X,X).
OUTPUT
pal([b,a,c,a,b]).
Yes
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...
2 comments:
very good thank you good structure and management in prolog
without using reverse we can make or not
Post a Comment