OFFSET
1,1
COMMENTS
MATHEMATICA
q[n_] := Module[{m = 1}, While[!Divisible[m*(m + 1), 5*n], m++]; GCD[5*n, m] == 5]; Select[Range[360], q] (* Amiram Eldar, Jun 17 2022 *)
PROG
(PARI) A354935(n) = A354940sq(5, n);
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jun 15 2022
STATUS
approved