20160413_3_fatorial3.alg

algoritmo "20160413_3_fatorial3"
// Função :
// Autor :
// Data : 15/04/2016
// Seção de Declarações 
var
   a, i:inteiro
inicio
// Seção de Comandos 
   i <- 5
   a <- 1
   para i de 5 ate 1 passo -1 faca
      a <- a*i
   fimpara
   escreval("Fatorial de 5: ",a:1)
fimalgoritmo