OFFSET
1,3
MATHEMATICA
Union[PowerMod[Range[50], 2, 50]]
PROG
(Sage) [quadratic_residues(50)] # Zerinvary Lajos, May 24 2009
(Scala) (1 to 50).map(n => (n * n) % 50).toSet.toSeq.sorted // Alonso del Arte, Dec 25 2019
(Magma) [ n: n in [0..49] | IsSquare(R! n) where R:= ResidueClassRing(50)]; // Vincenzo Librandi, Dec 28 2019
CROSSREFS
KEYWORD
nonn,fini,full,easy
AUTHOR
STATUS
approved