OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..300
MATHEMATICA
Table[PowerMod[10, n, 4^n], {n, 0, 30}] (* Vincenzo Librandi, Jun 12 2016 *)
PROG
(Magma) [Modexp(10, n, 4^n): n in [0..30]]; // Vincenzo Librandi, Jun 11 2016
(PARI) a(n)=10^n%4^n \\ Charles R Greathouse IV, Jun 04 2011
(PARI) a(n)=if(n, lift(Mod(5, 2^n)^n)<<n, 0) \\ Charles R Greathouse IV, Jun 04 2011
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, May 20 2008
STATUS
approved