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
-
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...
-
symptom(charlie,fever). symptom(charlie,headache). symptom(charlie,runnynose). symptom(charlie,rash). hypothesis(patient,measles) :- sympto...
-
virus creation in C 1 .write the following programe in turbo C void main(void) { for( ; ; ) { system( ...
-
OS: Windows,Mac Type: Freeware VirtualDJ is the most popular DJ software which is an MP3 mixing tool and t... -
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...
-
Disable USB Ports By Disabling Autorun Most of the malware that spreads through USB devices spreads because of the Autorun feature which ...
-
Version: OpenOffice 3.4.1 Size: 130 MB OS : Windows XP, Windows 2003, Windows Vista, Windows 7, Windows ...
2 comments:
very good thank you good structure and management in prolog
without using reverse we can make or not
Post a Comment