Question

faça um algoritmo que Leia um número inteiro qualquer, calcule e
imprima o seu fatorial.

Answer 1

algoritmo "calculaFatorial"

var   numero, i, fatorial : inteiro

inicio
     fatorial <- 1
     escreva("Número: ")
     leia(numero)
       para i de 1 ate numero faca
         fatorial <- fatorial * i
       fimpara
     escreva("O fatorioal: ",fatorial)
fimalgoritmo