Services & ResourcesWolfram ForumsMathGroup Archive

[Date Index] [Thread Index] [Author Index]

Re: count zeros in a number

• To: mathgroup at smc.vnet.net
• Subject: [mg121808] Re: count zeros in a number
• From: "Dr. Wolfgang Hintze" <weh at snafu.de>
• Date: Mon, 3 Oct 2011 04:22:37 -0400 (EDT)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• References: <j69104$rda$1@smc.vnet.net>

"dimitris" <dimmechan at yahoo.com> schrieb im Newsbeitrag 
news:j69104$rda$1 at smc.vnet.net...
> Hello.
>
> Consider e.g. the number 24^24*55^55.
> This number ends with exactly 55 zeros as the following demonstrate
>
> In[201]:= Mod[24^24*55^55, 10^55]
> Mod[24^24*55^55, 10^56]
>
> Out[201]= 0
> Out[202]= 20000000000000000000000000000000000000000000000000000000
>
>
> What I want now is a way to count the zeros that a number ends 
> without
> knowing in advance this number of zeros like in the above example.
>
> Thanks in advance.
> Dimitris
>
You can use the function

f[z_]:=Length[Split[IntegerDigits[z]][[-1]]]
z = 24^24*55^55;
f[z]
62

Wolfgang

• Follow-Ups:
  • Re: count zeros in a number
    • From: DrMajorBob <btreat1@austin.rr.com>