A062826 Square nialpdromes not ending in 0.
1, 4, 9, 64, 81, 441, 841, 961, 7744, 8874441, 9853321, 999887641
Offset: 1
Programs
-
Maple
F:= proc(x) local L; L:= convert(x,base,10); max(L[1..-2] - L[2..-1]) <= 0 end proc: select(F, [seq(seq((10*x+y)^2,y=1..9),x=0..10^6)]); # Robert Israel, Dec 08 2015
Comments