A010439 Squares mod 78.

0, 1, 3, 4, 9, 10, 12, 13, 16, 22, 25, 27, 30, 36, 39, 40, 42, 43, 48, 49, 51, 52, 55, 61, 64, 66, 69, 75

Offset

1,3

Links

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

Mathematica

Union[PowerMod[Range[78], 2, 78]] (* Alonso del Arte, Dec 26 2019 *)

Prog

(Sage) [quadratic_residues(78)] # Zerinvary Lajos, May 28 2009
(Scala) (1 to 78).map(n => (n * n) % 78).toSet.toSeq.sorted // Alonso del Arte, Dec 26 2019

Crossrefs

Cf. A010400, A028791.

Sequence in context: A283973 A276672 A010400 * A005836 A054591 A121153

Adjacent sequences: A010436 A010437 A010438 * A010440 A010441 A010442

Keyword

nonn,fini,full,easy

Author

N. J. A. Sloane

Status

approved