Re: count zeros in a number
- To: mathgroup at smc.vnet.net
- Subject: [mg121813] Re: count zeros in a number
- From: Peter Breitfeld <phbrf at t-online.de>
- Date: Mon, 3 Oct 2011 04:23:32 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- References: <j69104$rda$1@smc.vnet.net>
dimitris wrote:
I would convert to a string and use a regular expression:
trailingZeros[n_] :=
StringLength@StringCases[ToString[n], RegularExpression["0+$"]]
trailingZeros[24^24 55^55]
Out={55}
trailingZeros[10000!]
Out={2499}
> 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
>
--
_________________________________________________________________
Peter Breitfeld, Bad Saulgau, Germany -- http://www.pBreitfeld.de