A010443 Squares mod 82.
0, 1, 2, 4, 5, 8, 9, 10, 16, 18, 20, 21, 23, 25, 31, 32, 33, 36, 37, 39, 40, 41, 42, 43, 45, 46, 49, 50, 51, 57, 59, 61, 62, 64, 66, 72, 73, 74, 77, 78, 80, 81
Offset: 1
Programs
-
Mathematica
Union[PowerMod[Range[82], 2, 82]] (* Alonso del Arte, May 01 2020 *)
-
Sage
[quadratic_residues(82)] # Zerinvary Lajos, May 28 2009
-
Scala
(1 to 82).map(n => n * n % 82).toSet.toList.sorted // Alonso del Arte, May 01 2020