jogo(cs).
jogo(minecraft).
jogo(lol).
jogo(valorant).
jogo(gta).
jogo(thedivision).
jogo(starcraft).
jogo(quake).
jogo(nfs).
jogo(horizonzerodawn).
jogo(burnout).
jogo(streetfight).
genero(cs,fps).
genero(minecraft,survivor).
genero(lol,moba).
genero(valorant,fps).
genero(gta,acao).
genero(thedivision,acao).
genero(starcraft,mmo).
genero(quake,fps).
genero(nfs,corrida).
genero(burnout,corrida).
genero(horizonzerodawn,acao).
desenho(rickandmorty).
desenho(jojo).
desenho(midnightgospel).
desenho(horadeaventura).
desenho(drstone).
desenho(dragonball).
desenho(superherogirls).
desenho(desencanto).
desenho(lovedeathrobots).
desenho(bojack).
desenho(ben10).
desenho(gumball).
desenho(johnnybravo).
desenho(billyandmandy).
canal(rickandmorty, netflix).
canal(jojo, crunchyroll).
canal(drstone,crunchyroll).
canal(superherogirls,netflix).
canal(desencanto,netflix).
canal(dragonball,crunchyroll).
canal(midnightgospel,netflix).
canal(horadeaventura,netflix).
canal(lovedeathrobots,netflix).
canal(bojack,netflix).
canal(ben10,sky).
canal(gumball,sky).
canal(johnnybravo,sky).
canal(billyandmandy,netflix).
preco(minecraft,169).
preco(gta,70).
preco(thedivision,90).
preco(burnout,71).
preco(quake,18).
preco(nfs,150).
preco(netflix,32).
preco(crunchyroll,35).
preco(sky,110).
preco(horizonzerodawn,54).
preco(streetfight,200).
lancamento(cs,2000).
lancamento(minecraft,2009).
lancamento(lol,2009).
lancamento(valorant,2020).
lancamento(gta,2013).
lancamento(thedivision,2016).
lancamento(starcraft,1998).
lancamento(quake,1996).
lancamento(rickandmorty,2013).
lancamento(superherogirls,2019).
lancamento(desencanto,2018).
lancamento(jojo,1987).
lancamento(midnightgospel,2020).
lancamento(horadeaventura,2010).
lancamento(drstone,2017).
lancamento(dragonball,1989).
lancamento(burnout,2001).
lancamento(lovedeathrobots,2019).
lancamento(bojack,2014).
lancamento(ben10,2005).
lancamento(gumball,2008).
lancamento(johnnybravo,1995).
lancamento(nfs,2004).
lancamento(horizonzerodawn,2017).
lancamento(streetfight,1978).
lancamento(billyandmandy,1995).
principal(cs,homem).
principal(minecraft,varios).
principal(lol,varios).
principal(valorant,varios).
principal(gta,homem).
principal(thedivision,varios).
principal(starcraft,varios).
principal(desencanto,mulher).
principal(quake,homem).
principal(rickandmorty,homem).
principal(superherogirls,mulher).
principal(jojo,homem).
principal(midnightgospel,homem).
principal(horadeaventura,homem).
principal(drstone,homem).
principal(dragonball,homem).
principal(lovedeathrobots,varios).
principal(bojack,animal).
principal(ben10,homem).
principal(gumball,animal).
principal(johnnybravo,homem).
principal(nfs,homem).
principal(horizonzerodawn,mulher).
principal(burnout,varios).
principal(street,varios).
principal(billyandmandy, homem).

mulher(X):-principal(X,mulher),(jogo(X);desenho(X)).
jogogratis(X,Y):-jogo(X),not(preco(X,Y)).
naovarios(X,Y):-principal(X,Y), Y\=varios.
                    

            06) Quais são os desenhos que passam na sky?
            
            ?- desenho(X),canal(X,sky).
            X = ben10 ;
            X = gumball ;
            X = johnnybravo ;
            false.
            
            07) Quais são os jogos que possuem uma mulher como 
            personagem principal?
            
            ?- jogo(X),principal(X,mulher).
            X = horizonzerodawn ;
            false.
            
            08) Quais são os desenhos que possuem mulher ou vários como 
            personagem principal?
            
            ?- desenho(X),(principal(X,mulher); principal(X,varios)).
            X = superherogirls ;
            X = desencanto ;
            X = lovedeathrobots ;
            
            09) Quais são os jogos que não são grátis que possuem a mulher 
            como atriz principal?
            
            ?- jogo(X),preco(X,_),principal(X,mulher).
            X = horizonzerodawn ;
            false.
            
            10) Quais são os desenhos que possuem animal como ator principal?
            
            ?- desenho(X),principal(X,animal).
            X = bojack ;
            X = gumball ;
            false.
            
            11) Quais são os jogos lançados antes de 2000 e depois de 1980?
            
            ?- jogo(X),lancamento(X,Y),Y>1980,Y<2000.
            X = starcraft,
            Y = 1998 ;
            X = quake,
            Y = 1996 ;
            false.
            
            
            12) Quais são os jogos lançados antes de 2000 e depois de 1980 com o 
            ator principal vários?
            
            ?- jogo(X),lancamento(X,Y),principal(X,varios),Y>1980,Y<2000.
            X = starcraft,
            Y = 1998 ;
            false.
            
            
            13) Liste os desenhos da netflix lançados depois de 2018;
            
            ?- desenho(X),canal(X,netflix),lancamento(X,Y),Y>2018.
            X = midnightgospel,
            Y = 2020 ;
            X = superherogirls,
            Y = 2019 ;
            X = lovedeathrobots,
            Y = 2019 ;
            false.
            
            14) Que desenhos possuem a mulher como atriz principal 
            e do canal netflix?
            
            ?- desenho(X),principal(X,mulher),canal(X,netflix).
            X = superherogirls ;
            X = desencanto ;
            false.
            
            15) Qual é o desenho ou jogo lançado em 2013?
            
            ?- (desenho(X);jogo(X)),lancamento(X,Y),Y=2013.
            X = rickandmorty,
            Y = 2013 ;
            X = gta,
            Y = 2013 ;
            false.
            
            16) Quais são os jogos de corrida ou ação onde a mulher 
            é atriz principal?
            
            ?- jogo(X),(genero(X,corrida);genero(X,acao)),principal(X,mulher).
            X = horizonzerodawn ;
            false.
            
            17) Use a regra naovarios para retornar os jogos ou desenhos 
            onde o ator principal é animal;
            
            ?- naovarios(X,Y),principal(X,animal).
            X = bojack,
            Y = animal ;
            X = gumball,
            Y = animal ;
            false.
            
            18) Quais são os jogos ou desenhos lançados até 2000?
            
            ?- (jogo(X);desenho(X)),lancamento(X,Y),Y=<2000.
            X = cs,
            Y = 2000 ;
            X = starcraft,
            Y = 1998 ;
            X = quake,
            Y = 1996 ;
            X = streetfight,
            Y = 1978 ;
            X = jojo,
            Y = 1987 ;
            X = dragonball,
            Y = 1989 ;
            X = johnnybravo,
            Y = 1995 ;
            X = billyandmandy,
            Y = 1995.
            
            19) Quais são os jogos lançados até 2000 e gratuitos?
            
            ?- jogo(X),lancamento(X,Y), Y=<2000,not(preco(X,_)).
            X = cs,
            Y = 2000 ;
            X = starcraft,
            Y = 1998 ;
            false.
            
            20) Quais são os jogos lançados a partir de 2000 que custam 
            de 100 a 200 reais?
            
            ?- jogo(X),lancamento(X,Y),Y>=2000,preco(X,Z), Z>=100,Z=<200.
            X = minecraft,
            Y = 2009,
            Z = 169 ;
            X = nfs,
            Y = 2004,
            Z = 150 ;
            false.
            
            21) Quais são os jogos lançados a partir de 2000 que 
            possuem homens como ator principal?
            
            ?- jogo(X),lancamento(X,Y),Y>=2000,principal(X,homem).
            X = cs,
            Y = 2000 ;
            X = gta,
            Y = 2013 ;
            X = nfs,
            Y = 2004 ;
            false.
            
            22) Quais são os desenhos que não são da sky?
            
            ?- desenho(X),not(canal(X,sky)).
            X = rickandmorty ;
            X = jojo ;
            X = midnightgospel ;
            X = horadeaventura ;
            X = drstone ;
            X = dragonball ;
            X = superherogirls ;
            X = desencanto ;
            X = lovedeathrobots ;
            X = bojack ;
            X = billyandmandy.
            
            23) Quais são os desenhos que não são da sky lançado depois de 2015?
            
            ?- desenho(X),not(canal(X,sky)),lancamento(X,Y),Y>2015.
            X = midnightgospel,
            Y = 2020 ;
            X = drstone,
            Y = 2017 ;
            X = superherogirls,
            Y = 2019 ;
            X = desencanto,
            Y = 2018 ;
            X = lovedeathrobots,
            Y = 2019 ;
            false.
            
            24) Quais são os desenhos que não são da sky lançado depois de 2015 
            protagonizados por mulheres?
            
            ?- desenho(X),not(canal(X,sky)),lancamento(X,Y),Y>2015,principal(X,mulher).
            X = superherogirls,
            Y = 2019 ;
            X = desencanto,
            Y = 2018 ;
            false.
            
            25) Espero que esteja tudo certo. 
            Envie para sandrominas@gmail.com e Até Mais!