A054580 n^2 modulo 17.
0, 1, 4, 9, 16, 8, 2, 15, 13, 13, 15, 2, 8, 16, 9, 4, 1, 0, 1, 4, 9, 16, 8, 2, 15, 13, 13, 15, 2, 8, 16, 9, 4, 1, 0, 1, 4, 9, 16, 8, 2, 15, 13, 13, 15, 2, 8, 16, 9, 4, 1, 0, 1, 4, 9, 16, 8, 2, 15, 13, 13, 15, 2, 8, 16, 9, 4, 1, 0, 1, 4, 9, 16, 8, 2, 15, 13, 13, 15, 2, 8, 16, 9, 4, 1, 0, 1, 4, 9
Offset: 0
Programs
-
Mathematica
Table[Mod[n^2,17],{n,0,200}] (* Vladimir Joseph Stephan Orlovsky, Apr 23 2011 *) PowerMod[Range[0,90],2,17] (* Harvey P. Dale, Aug 16 2012 *)
-
PARI
a(n)=n^2%17 \\ Charles R Greathouse IV, Apr 06 2016
Extensions
More terms from James Sellers, Apr 12 2000