A071583 Powers of 5 written backwards.

1, 5, 52, 521, 526, 5213, 52651, 52187, 526093, 5213591, 5265679, 52182884, 526041442, 5213070221, 5265153016, 52187571503, 526098785251, 521354939267, 5265627964183, 52182368437091, 52604613476359, 521302851738674

Offset: 0

Author

Benoit Cloitre, Jun 01 2002

Keywords

• easy
• nonn
• base

Links

• Alois P. Heinz, Table of n, a(n) for n = 0..1000

Programs

Maple

a:= n-> (s-> parse(cat(s[-i]$i=1..length(s))))(""||(5^n)):
seq(a(n), n=0..50);  # Alois P. Heinz, Apr 09 2015

Mathematica

IntegerReverse/@(5^Range[0,30]) (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, May 15 2017 *)

PARI

for(i=1,50,n=5^i; s=ceil(log(n)/log(10)); print1(sum(i=0,s,10^(s-i-1)*(floor(n/10^i)-10*floor(n/10^(i+1)))),","))