A066609 a(n) = remainder when 5^n is divided by n^5.

0, 25, 125, 625, 0, 73, 10897, 30177, 4508, 65625, 29672, 36433, 263034, 288873, 575000, 159681, 592030, 1485433, 1639363, 1240625, 250928, 928073, 4040001, 93601, 0, 10915033, 14288075, 16048657, 3176520, 4515625

Offset

1,2

Links

Harry J. Smith, Table of n, a(n) for n = 1..1000

Example

a(6) = 73 as 5^6 = 15625 = (6^5)*2 + 73.

Mathematica

Table[ Mod[5^n, n^5], {n, 1, 30} ]
Table[PowerMod[5, n, n^5], {n, 30}] (* Harvey P. Dale, Jul 05 2023 *)

Prog

(PARI) { for (n=1, 1000, write("b066609.txt", n, " ", 5^n % n^5) ) } \\ Harry J. Smith, Mar 11 2010

Crossrefs

Sequence in context: A211581 A226231 A211595 * A074006 A073963 A316277

Adjacent sequences: A066606 A066607 A066608 * A066610 A066611 A066612

Keyword

nonn

Author

Amarnath Murthy, Dec 24 2001

Extensions

More terms from Robert G. Wilson v, Dec 26 2001

Status

approved