login
Nonsquares mod 25.
2

%I #15 Dec 25 2019 15:31:34

%S 2,3,5,7,8,10,12,13,15,17,18,20,22,23

%N Nonsquares mod 25.

%t Complement[Range[0, 24], PowerMod[Range[0, 24], 2, 25]] (* _Alonso del Arte_, Nov 25 2019 *)

%o (Scala) val squaresMod25 = (0 to 24).map(n => n * n).map(_ % 25)

%o (0 to 24).diff(squaresMod25) // _Alonso del Arte_, Nov 25 2019

%Y Cf. A010387.

%K nonn,fini,full,easy

%O 1,1

%A _N. J. A. Sloane_