A010444 Squares mod 83.
0, 1, 3, 4, 7, 9, 10, 11, 12, 16, 17, 21, 23, 25, 26, 27, 28, 29, 30, 31, 33, 36, 37, 38, 40, 41, 44, 48, 49, 51, 59, 61, 63, 64, 65, 68, 69, 70, 75, 77, 78, 81
Offset: 1
Crossrefs
Cf. A028796.
Programs
-
Magma
[n: n in [0..82] | IsSquare(R! n) where R := ResidueClassRing(83)]; // Vincenzo Librandi, Jan 24 2020
-
Mathematica
Union[PowerMod[Range[83], 2, 83]] (* Alonso del Arte, Jan 23 2020 *)
-
Sage
[quadratic_residues(83)] # Zerinvary Lajos, May 28 2009
-
Scala
(1 to 83).map(n => n * n % 83).toSet.toSeq.sorted // Alonso del Arte, Jan 23 2020