OFFSET
0,2
COMMENTS
Period = 500.
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1000 (first 504 terms from V. Raman)
MATHEMATICA
PowerMod[2, Range[0, 100], 10000] (* Vincenzo Librandi, Aug 16 2016 *)
PROG
(PARI) for(i=0, 500, print(2^i%10000" "))
(Magma) [Modexp(2, n, 10000): n in [0..110]]; // Vincenzo Librandi, Aug 16 2016
CROSSREFS
KEYWORD
nonn,base,less,easy
AUTHOR
V. Raman, Sep 01 2012
STATUS
approved