woman(mia).
woman(jody).
woman(yolanda).
loves(vincent, mia).
loves(marsellus, mia).
loves(pumpkin, honey_bunny).
loves(honey_bunny, pumpkin).
?- woman(X).
Show Answer
X=mia;
X=jody;
X=yolanda;
3 solutions
?- loves(marsellus,X), woman(X).
Show Answer
X=mia
1 solution
?- loves(pumpkin,X), woman(X).
Show Answer
no solution
loves(vincent,mia).
loves(marsellus,mia).
loves(pumpkin, honey_bunny).
loves(honey_bunny, pumpkin).
jealous(X,Y):- loves(X,Z), loves(Y,Z).
?- jealous(marsellus,W).
Show Answer
W=vincent
W=marsellus
2 Solutions
parent(leyla, omar).
parent(ali, omar).
parent(omar, meriam).
parent(omar, khaled).
parent(ali, nour).
parent(khaled, zahra).
?- parent(omar, khaled).
Show Answer
yes
?- parent(X, zahra).
Show Answer
X=khaled
1 Solution
?- parent(omar,X).
Show Answer
X=meriam
X=khaled
2 Solutions
?- parent(X,Y).
Show Answer
X=leyla, Y=omar
X=ali, Y=omar
X=omar, Y=meriam
X=omar, Y=khaled
X=ali, Y=nour
X=khaled, Y=zahra
6 Solutions
?- parent(X, khaled) ,parent(Y, X).
Show Answer
X=omar, Y=leyla
X=omar, Y=ali
2 Solutions
?- parent(ali,X),parent (X,Y).
Show Answer
X=omar, Y=meriam
X=omar, Y=khaled
2 Solutions
?- parent(X, meriam) parent(X,nour).
Show Answer
No Solution
- Convert the following paragraph into fact or rule:
- a person may be a smart buyer for something if the person is a smart and he likes the thing and the thing is valuable and the thing has a discount.
Show Answer
smart(ahmed).
smart(nada).
smart(noha).
smart(islam).
likes(ahmed, leather-jackets).
likes(ahmed, sun-glasses).
likes(soha,sun-glasses).
likes(islam,books).
likes(nada, perfume).
valuable(gold).
valuable(books).
valuable(leather-jackets).
discount(books).
discount(perfumes).
Smart-buyer(X,Y):-
smart(X),likes(X,Y)
,valuable(Y),
discount(Y).
- Convert the following paragraph into fact or rule:
- Bob likes all kind of game. Football is a game. Anything anyone plays and not killed by is a game.
Show Answer
plays(player1,football).
plays(player2,tennis).
plays(player3,handball).
plays(player4,car-racing).
not-killed(football).
not-killed(tennis).
not-killed(handball).
likes(„Bob‟, X):-game(X).
game(Anything):- plays(_,Anything),not-killed(Anything)
write prolog program to read integer value and print it.
Show Answer
Predicates
print.
Clauses
print:- write ("please read integer number"), readint(X),
write("you read",X).
Goal
print.
write prolog program that take two integer input us integer and print the greater.
Show Answer
Predicates
greater (integer,integer).
Clauses
greater(X,Y):- X>Y, !, write("the greater is",X).
greater(X,Y):- X<Y, !, write ("the greater is ",Y).
greater(_,_):- write ("both are equal").
Goal
greater(4,4).
Show Answer
- B
- D
- C
- A
Show Answer
- all(O(x) - >F(x)) Where O is orange cat, and f is fluffy
- (all loves(x, y) and some friend (y))
- all p(x) -> all p(y)
- some b(x) > a(x)
Show Answer
- all crows are black
- All vegetarian doesn't eat some kind of meats
Show Answer
- {a,b both are true}
- c
- b
- b
write prolog program to check if the given number is positive or negative.
Show Answer
Predicates
nondeterm pos_neg(integer).
Clauses
pos_neg(X):- X>0, !, write("positive number"),nl.
pos_neg(X):- X=0, !, write("zero"),nl.
pos_neg(_):-write("negative number"),nl.
goal
pos_neg(0).
%pos_neg(1).
%pos_neg(-1).
write prolog program to check if a given number is odd or even.
Show Answer
Predicates
odd_even(integer).
Clauses
odd_even(X):- X mod 2=0, !, write ("even number"), nl.
odd_even(_):- write ("odd number"), nl.
Goal
odd_even(2).
%odd_even(1).