fatorial em perl

• Download fatorial2.pl
• Enviar nova versão

Esconder código-fonte

#!/urs/bin/perl
#autor : m4rc1054nt05
#date 09-12-2005
#Programa que calcula o fatorial

$c =1;
$fatorial =1;

print "digite o numero que gostaria de calcular: \n";
chomp ( $number = <STDIN> );

while ( $c <= $number ){
$fatorial *= $c;
++$c;
}

print "O fatorial e $fatorial.\n";

Programa que separa os dígitos de um inteiro

Múltiplos de 7 - Decrescente

Soma varios valores e mostra sua media

Separa os dígitos de um número

Crivo de Eratóstenes Simples em Perl

Nenhum comentário foi encontrado.