|
| |
|
|
A071583
|
|
Powers of 5 written backwards.
|
|
2
|
|
|
|
1, 5, 52, 521, 526, 5213, 52651, 52187, 526093, 5213591, 5265679, 52182884, 526041442, 5213070221, 5265153016, 52187571503, 526098785251, 521354939267, 5265627964183, 52182368437091, 52604613476359, 521302851738674
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
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))))(""||(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 *)
|
|
|
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
|
Sequence in context: A247777 A193809 A134111 * A099881 A280063 A196531
Adjacent sequences: A071580 A071581 A071582 * A071584 A071585 A071586
|
|
|
KEYWORD
|
easy,nonn,base
|
|
|
AUTHOR
|
Benoit Cloitre, Jun 01 2002
|
|
|
STATUS
|
approved
|
| |
|
|
