OFFSET
1,10
PROG
(PARI) for(n=1, 100, print1(sum(i=1, n^2, if((n*i)^2%(i^2+n^2), 0, 1)), ", "))
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, May 26 2002
STATUS
approved