A010444 Squares mod 83.

0, 1, 3, 4, 7, 9, 10, 11, 12, 16, 17, 21, 23, 25, 26, 27, 28, 29, 30, 31, 33, 36, 37, 38, 40, 41, 44, 48, 49, 51, 59, 61, 63, 64, 65, 68, 69, 70, 75, 77, 78, 81

Offset

1,3

Links

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

Mathematica

Union[PowerMod[Range[83], 2, 83]] (* Alonso del Arte, Jan 23 2020 *)

Prog

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

Crossrefs

Cf. A028796.

Sequence in context: A114889 A174659 A242423 * A010398 A010435 A057709

Adjacent sequences: A010441 A010442 A010443 * A010445 A010446 A010447

Keyword

nonn,fini,full,easy

Author

N. J. A. Sloane

Status

approved