[½»Á÷] Euler ¹¤³ÌµÚÊ®ÁùÌ⣺2µÄ1000´Î·½µÄ¸÷ÏîºÍ ÒÑÓÐ6È˲ÎÓë

Originally posted by sudo at 2011-05-26 21:52:34:
¿È£¬ÎÒͻȻÏëµ½Ò»¸öºÃÍæµÄ¶«Î÷...

¶ÔÓÚÒ»¸öÊýµÄ´óÖ¸Êý³öÀ´µÄ¸÷¸öλÊý£¬0-9µÄ¸ÅÂÊ·Ö²¼Ç÷ÏòÓÚ¾ùÔÈ·Ö²¼~

ÄÇôÎÒÃÇ¿ÉÒÔ×ö´óÖµĹÀË㣺

2^1000µÄλÊýΪ

ÏòÏÂÈ¡Õû(1000 * log 2) + 1 = 302 λ

¶ÔÓÚ ...

#!/usr/bin/perl
use bigint;
$sum += $_ foreach(2**1000 =~ /(.)/g);
print "result:$sum\n";

Originally posted by huycwork at 2011-05-26 21:38:51:
À´¸öPerl°æ£º

CODE:

#!/usr/bin/perl
use bigint;
$sum += $_ foreach(2**1000 =~ /(.)/g);
print "result:$sum\n";

½á¹û£º1366

Originally posted by huycwork at 2011-05-26 22:29:58:
Õâô˵µÄ»°£¬Õâ¸öºÃÍæµÄ¶«Î÷»¹ÓÐÁíÍâÒ»¸öÀ©Õ¹ÁË£ºÉ¢ÁÐÂ룬³Ë·¨ÔËËãµÄ¹ý³ÌÖУ¬³ýÁËÊ×λºÍĩλ֮Í⣬ÖмäµÄËùÓÐλ¶¼ÓëÒòÊýµÄλÊýÏà¹Ø£¬µÃ³öµÄ½á¹ûÖаüº¬Á˸÷ÖÖÀëÉ¢µÄÒòËØ£¬µÃ³öµÄÖµÒ²±Ø¶¨ÊǾùÔÈ·ÖÉ¢µÄ¡£ÆÚÍûÖµÓ¦ ...