OFFSET
1,3
MATHEMATICA
Union[PowerMod[Range[36], 2, 36]] (* Vincenzo Librandi, Jan 31 2020 *)
PROG
(Sage) [quadratic_residues(36)] # Zerinvary Lajos, May 24 2009
(Magma) [n: n in [0..35] | IsSquare(R! n) where R:= ResidueClassRing(36)]; // Vincenzo Librandi, Jan 31 2020
CROSSREFS
KEYWORD
nonn,fini,full
AUTHOR
STATUS
approved