Desenvolver um programa em Prolog que apresente o fatorial de um número, como no exemplo a seguir.
?- fatorial(5, N), write(N), nl. 120