Arvorezinha – Prolog
Olá bom dia!
O meu colega enviou me por mail mais uma nova versão da arvorezinha, desta vez em prolog. Aqui vai o sores:
stars(0).
stars(N) :- write('*'), M is N-1, stars(M).
arvorezinha(5).
arvorezinha(N):- M is N+1, stars(M),write('\n'),X is N+1,arvorezinha(X).
display:-arvorezinha(0).
display.
