Baixe o app para aproveitar ainda mais
Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original
algoritmo "semnome" // Função : Demonstrar a capacidade de recursividade do Visualg versão 2.0 // bem como o uso parametros passados por referencia // Autor : Cláudio Morgado de Souza // Data : 29/12/2003 // Seção de Declarações var valor : inteiro procedimento obtervalor(var x : inteiro) inicio escreva("Digite um número:") leia(x) fimprocedimento funcao fatorial(v:inteiro) : inteiro inicio se v <= 2 entao retorne v senao retorne v * fatorial(v-1) fimse fimfuncao inicio // Corpo principal do programa obtervalor(valor) escreva("O fatorial de ",valor," é ",fatorial(valor)) fimalgoritmo
Compartilhar