sfida (semplice!):
scrivere un programma che calcoli il fattoriale (o una buona approssimazione)
senza usare algoritmi ricorsivi XD
ecco la mia soluzione
[ot]
[/ot]
con questo metodo riesco a calcolare fino al fattoriale di 170...
scrivere un programma che calcoli il fattoriale (o una buona approssimazione)
senza usare algoritmi ricorsivi XD
ecco la mia soluzione
[ot]
Codice:
#!/usr/bin/perl
$pi = 3.141592653589793238;
$e = 2.718281828459045235;
sub fatt {
$num = shift;
if ($num<0) {
print "Only positive and intere numbers!\n\n";
} else {
$num = int($num);
if($num==0) {print "$num! = 1\n\n"}
else {$aaa = ((sqrt(2*$pi*$num))*(($num/$e)**$num)); print "$num! ~$aaa\n\n"}
}
}
print "please insert number: ";
$num = <>;
&fatt($num);
con questo metodo riesco a calcolare fino al fattoriale di 170...