This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A034989 #6 Oct 06 2019 18:12:55 %S A034989 64,66049,6661561,6666724,66666207204,6666662032144,66666669781156, %T A034989 666666667972321,666666666784689561,66666666662139024481, %U A034989 66666666666067063944516,6666666666663510150195841,66666666666662415539262729,666666666666660853687280656 %N A034989 Smallest squares starting with a string of n 6's. %t A034989 For[i = 1, i < 20, i++, zeros = 0; isFound = False; %t A034989 While[ !isFound, low = Ceiling[ Sqrt[ 2/3*(10^i - 1)*10^zeros ] ]; high = Floor[ Sqrt[ (2/3*(10^i - 1) + 1)*10^zeros ] ]; isFound = (low <= high); zeros++ ]; Print[ low, " ", low^2 ] ] %Y A034989 Cf. A034988. %K A034989 nonn,base %O A034989 1,1 %A A034989 _Patrick De Geest_, Nov 15 1998 %E A034989 Program and more terms from Jonathan Cross (jcross(AT)wcox.com), Oct 15 2001