masculino(Thiago).
masculino(Fausto Rosa).
masculino(Fausto Filho).
masculino(José Carlos).
masculino(Ravi).
masculino(Ronald).
masculino(Rafael).
masculino(Cauan).
masculino(Bruno).
masculino(Davi).
feminino(Clelha).
feminino(Ivania).
feminino(Kamylla).
feminino(Danyelle).
feminino(Rebeca).
feminino(Mellysa).
idade(Cauan, 17).
idade(Ravi, 3).
idade(Mellysa, 19).
idade(Rebeca, 13).
idade(Bruno, 45).
idade(Danyelle, 41).
idade(Fausto Filho, 33).
idade(Fausto Rosa, 69).
idade(Jose Carlos, morto).
idade(Thiago, 49).
idade(Kamylla, 40).
idade(Clelha, 31).
idade(Davi, 11).
idade(Ronald, 31).
idade(Rafael, 34).
idade(Ivania, 65).
genitor(Clelha).
genitor(Kamylla).
genitor(Thiago).
genitor(Bruno).
genitor(Danyelle).
genitor(Ivania).
genitor(Jose Carlos).
genitor(Fausto Rosa).



1. Quais são os homens na família que possuem filhos?
?- masculino(X), genitor(X,Y).

Resultado: X = Bruno, Y = Cauan ; X = Thiago, Y = Mellysa ; X = Thiago, Y = Davi ; false.

2. Quem são as filhas da família?
?- genitor(X,Y), feminino(Y).

Resultado: X = José Carlos, Y = Kamylla ; X = José Carlos, Y = Danyelle ; X = Fausto Rosa, Y = Clelha ; X = Kamylla, Y = Mellysa ; X = Ronald, Y= Rebeca.

3. Quais são as mulheres com mais de 30 anos?
?- feminino(X), idade(X,Y), Y>30

Resultado: X = Danyelle, Y = 41 ; X = Clelha, Y = 31 ; X = Ivania = 65 ; X = Kamylla, Y = 40 ; false.

4. Quais são os netos?
?- genitor(X,Y),genitor(Y,Z).

Resultado: X = Ivania, Y = Kamylla, Z = Davi ; X = Ivania, Y = Kamylla, Z = Mellysa ; X = Ivania, Y = Danyelle, Z = Cauan ; X = Ivania, Y = Clelha, Z = Rebeca ; X = Ivania, Y = Clelha, Z = Ravi ; false.

5. Quais são meus irmãos?
?- genitor(X,Cauan),genitor(X,Y).

Resultado: false