A010440 Squares mod 79.

0, 1, 2, 4, 5, 8, 9, 10, 11, 13, 16, 18, 19, 20, 21, 22, 23, 25, 26, 31, 32, 36, 38, 40, 42, 44, 45, 46, 49, 50, 51, 52, 55, 62, 64, 65, 67, 72, 73, 76

Offset

1,3

Links

Table of n, a(n) for n=1..40.

Mathematica

Union[PowerMod[Range[79], 2, 79]] (* Alonso del Arte, Jan 22 2020 *)

Prog

(Sage) [quadratic_residues(79)] # Zerinvary Lajos, May 28 2009
(Scala) (1 to 79).map(n => n * n % 79).toSet.toSeq.sorted // Alonso del Arte, Jan 22 2020
(Magma) [n: n in [0..78] | IsSquare(R! n) where R:= ResidueClassRing(79)]; // Vincenzo Librandi, Jan 23 2020

Crossrefs

Cf. A028792.

Sequence in context: A189633 A032891 A035262 * A072008 A175141 A072756

Adjacent sequences: A010437 A010438 A010439 * A010441 A010442 A010443

Keyword

nonn,fini,full,easy

Author

N. J. A. Sloane

Status

approved