Cálculo fatorial

Publicado por Osama Jr. 06/06/2009

[ Hits: 10.165 ]

Homepage: Não tenho

Download fatorial_bc




Mais um "bc script" que calcula o fatorial dum número utilizando-se de interações.

P.S.: Este método "one liner" =) também faz a mesma coisa: seq -s \* <valor> | bc

  



Esconder código-fonte

/*
 * Cálculo Fatorial.
 * Algoritmo adaptado a "calculadora" GNU bc.
 *
 * Uso: <bc script>
 * Para sair: <ctrl + d> ou <use um caractere não numérico>
 *
 * Autor: /bin/laden - 22/04/2009.
 *
 * Mais detalhes: <man bc> ou <www.google.com> =P
 *
 * Modo recursivo:
 *
 * define fatorial(valor)
 *  {
 *      if (valor <= 1) return(1);
 *      return(fatorial(valor - 1) * valor);
 *  }
 */

/* Modo interativo */
define fatorial(valor)
{
   auto x, y;
   x = 1;
   y = 1;
   
   while (y++ < valor) x = x * y;
   
   return(x);
}

while (1) {
   print "Fatorial de: ";
   input = read();

   /* "Input" inválido */
   if (!input) break;
   
   fatorial(input);
}
quit;

Scripts recomendados

Configurador de Rede Debian

plaskill

Projeto rodar League of Legends no Linux =)

Interface para o sqlmap

Instalar as bibliotecas do Cisco para versões 64 bits do Ubuntu


  

Comentários

Nenhum comentário foi encontrado.


Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts