A180259 Squares which are the sum of consecutive squares starting with 25^2.
625, 33124, 38025, 127449, 64529089, 81180100, 15884821225, 3370675683600
Offset: 1
Examples
38025 is in the sequence because 38025 = 195^2 = 25^2 + 26^2 + ... + 50^2.
Programs
-
Mathematica
Select[Accumulate[Range[25, 22000]^2], IntegerQ[Sqrt[#]] &] (* Harvey P. Dale, Aug 10 2023 *)
-
PARI
for(n=26,9999999,t=n*(n+1)*(2*n+1)/6-4900;if(issquare(t),print1(t,",")))
Comments