A081644 - OEIS

A081644

Integers congruent to 0, 1, 4, 9 or 16 (mod 25) which are not squares.

26, 29, 34, 41, 50, 51, 54, 59, 66, 75, 76, 79, 84, 91, 101, 104, 109, 116, 125, 126, 129, 134, 141, 150, 151, 154, 159, 166, 175, 176, 179, 184, 191, 200, 201, 204, 209, 216, 226, 229, 234, 241, 250, 251, 254, 259, 266, 275, 276, 279, 284, 291, 300, 301, 304

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

REFERENCES

Mark A. Herkommer, Number Theory, A Programmer's Guide, McGraw-Hill, New York, 1999, page 315.

LINKS

Robert Israel, Table of n, a(n) for n = 1..10000

MAPLE

remove(issqr, [seq(seq(25*i+j, j=[0, 1, 4, 9, 16]), i=1..50)]); # Robert Israel, Apr 08 2020

MATHEMATICA

Select[ Range[308], (Mod[ #, 25] == 0 || Mod[ #, 25] == 1 || Mod[ #, 25] == 4 || Mod[ #, 25] == 9 || Mod[ #, 25] == 16) && !IntegerQ[ Sqrt[ # ]] & ]

CROSSREFS