OFFSET
1,3
MATHEMATICA
Union[PowerMod[Range[83], 2, 83]] (* Alonso del Arte, Jan 23 2020 *)
PROG
(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
(Magma) [n: n in [0..82] | IsSquare(R! n) where R := ResidueClassRing(83)]; // Vincenzo Librandi, Jan 24 2020
CROSSREFS
KEYWORD
nonn,fini,full,easy
AUTHOR
STATUS
approved