[go: up one dir, main page]

login
A067446
Smallest n-th power starting with 5.
5
5, 529, 512, 50625, 59049, 531441, 52523350144, 5764801, 512, 59049, 584318301411328, 531441, 549755813888, 53148384174432398229504, 51185893014090757, 5070942774902496337890625, 505447028499293771
OFFSET
1,1
COMMENTS
Terms from Robert G. Wilson v.
MATHEMATICA
a = {}; Do[k = 1; While[First[IntegerDigits[k^n]] != 5, k++ ]; a = Append[a, k^n], {n, 1, 25}]; a (* Robert G. Wilson v *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Amarnath Murthy, Feb 05 2002
STATUS
approved