OFFSET
1,1
MATHEMATICA
Complement[Range[0, 41], PowerMod[Range[42], 2, 42]] (* Alonso del Arte, Dec 21 2019 *)
PROG
(PARI) for(k=0, 42, if(!issquare(Mod(k, 42)), print1(k, ", "))) \\ Hugo Pfoertner, Dec 02 2019
(Scala) (0 to 41).diff((1 to 42).map(n => (n * n) % 42)) // Alonso del Arte, Dec 21 2019
CROSSREFS
KEYWORD
nonn,fini,full,easy
AUTHOR
EXTENSIONS
Incorrect term 21 removed by Alonso del Arte, Dec 01 2019
STATUS
approved