login
A010401
Squares mod 40.
1
0, 1, 4, 9, 16, 20, 24, 25, 36
OFFSET
1,3
MATHEMATICA
Union[PowerMod[Range[40], 2, 40]] (* Vincenzo Librandi, Dec 27 2019 *)
PROG
(Sage) [quadratic_residues(40)] # Zerinvary Lajos, May 24 2009
(Scala) (1 to 40).map(n => n * n % 40).toSet.toSeq.sorted // Alonso del Arte, Feb 20 2020
CROSSREFS
Cf. A028753.
Sequence in context: A313328 A313329 A313330 * A313331 A313332 A313333
KEYWORD
nonn,fini,full,easy
STATUS
approved