欧拉计划34题，0的阶乘原来等于1，文盲了。

本文链接：https://blog.csdn.net/g_r_c/article/details/8333882

145 是一个奇怪的数字, 因为 1! + 4! + 5! = 1 + 24 + 120 = 145.

找出所有等于各位数字阶乘之和的数字之和。

注意: 因为 1! = 1 和 2! = 2 不是和的形式，所以它们不算在内。

开始一直没有做出来，原因是把0的阶乘当成0来算了。

这个题目是非常的简单的。唯一需要说的一点就是，各个位的阶乘的时候，我们可以先用一个数组把0..9的阶乘保存下来，然后到时候直接引用，这样能够不用每一个循环，都要重新算阶乘。这是我想到的一个优化。应该能够节省很多的时间。

第二点，就是关于范围的问题，我当时取的是2540160，也就是当有7个9的阶乘的时候。当8个9的阶乘仍然是一个7位数，就一定不成立了。不过关系不大。因为一共就两个符合条件的数

#任何一个8位数，他的阶乘最大是七位数，也就是永远不肯能能相等，所以我们循环到2540160；
#

use strict;
use warnings;

my @jiecheng=qw/1 1 2 6 24 120 720 5040 40320 362880/;
my $sum=0;
my $i;
my $num;
my @num;
my $sum_all=0;

for($i=3;$i<40730;$i++)
{
	$sum=0;
	@num=split//,$i;
	foreach $num(@num)
	{
		$sum=$jiecheng[$num]+$sum;
	}
	if($sum == $i)
	{
		$sum_all=$sum_all+$sum;
	}
}
print "$sum_all\n";

结果如下：

C:\WINDOWS\system32\cmd.exe /c perl "C:\Documents and Settings\Administrator\桌
面\b.pl"
40730
Hit any key to close this window...