OFFSET
0,2
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..1000
MAPLE
a:= n-> (s-> parse(cat(s[-i]$i=1..length(s))))(""||(7^n)):
seq(a(n), n=0..50); # Alois P. Heinz, Apr 09 2015
MATHEMATICA
FromDigits[Reverse[IntegerDigits[#]]]&/@(7^Range[0, 20]) (* Harvey P. Dale, Apr 29 2012 *)
PROG
(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)))), ", "))
CROSSREFS
KEYWORD
easy,nonn,base
AUTHOR
Benoit Cloitre, Jun 01 2002
STATUS
approved