3 lines
56 B
Perl
3 lines
56 B
Perl
|
use Math::Pari qw/ifact/;
|
||
|
|
say length( ifact(10000) );
|