Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses

Re: Finding sum of all digits from 1 to 1 million.

by flexvault (Monsignor)
on Jan 30, 2013 at 19:32 UTC ( #1016144=note: print w/replies, xml ) Need Help??

in reply to Finding sum of all digits from 1 to 1 million.


I confused by the term 'DECIMAL DIGITS'. In the following sequence, I would count the number of decimal digits as:

100 sum: 3 101 sum: 6 102 sum: 9 ...
In those 3 numbers, we have a total of 9 digits.

So if I use this code:

perl -E '$sum=0;for(1..1e6){$sum+=length($_);} say $sum;'
The result printed as 5888896, which is not 27000001.

So how is the term 'DECIMAL DIGITS' defined? I think that is key to solving for the "real" answer.


"Well done is better than well said." - Benjamin Franklin

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1016144]
choroba waves
[Mj1234]: Hello Monks, I have installed Active perl 5.16 and 5.14 but I dont find Devel::GDB package when I try to install through ppm
[Discipulus]: i'v installed ubuntu 16.04lts and i'm quite disappointed: is deadly simmilar to new win osses where you cannot find even simple things...
[Corion]: Hi Discipulus ;)
[Corion]: Mj1234: Maybe Ubuntu didn't package Devel::GDB? In that case, consider using local::lib and install the module from CPAN
[Corion]: But a quick Google search turns up this page, which seems to suggest that it should be packaged
[Discipulus]: iirc active perl has repositories only for last 2 o 3 major release of perl Mj1234. I strongly suggest portable version of strawberry perl and use cpan client to install modules
[choroba]: Also, who needs GDB when there's hdb?

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (9)
As of 2016-12-07 08:51 GMT
Find Nodes?
    Voting Booth?
    On a regular basis, I'm most likely to spy upon:

    Results (125 votes). Check out past polls.