Función facto <- factorial(N) Si N = 0 Entonces facto = 1 Sino facto = N*factorial(N-1) Fin Si FinFuncion Algoritmo factorialrecursivo leer N escribir "o seu factorial é ", factorial(N) FinAlgoritmo