Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original
Algoritmo"15" Var n,n1,f :inteiro Inicio f<-1 escreval("ENTRE COM VALOR: ") leia(n) para n1 de n ate 1 passo -1 faca f<-f*n1 escreval(n," x ",n1) fimpara escreval(" =",f) fimalgoritmo