cp's OEIS Frontend

A034993 Smallest square starting with a string of n 8's.

%I A034993 #10 Oct 07 2019 23:42:49
%S A034993 81,8836,88804,88887184,88888055881,888888810481,888888810481,
%T A034993 8888888859057216,88888888888905609,88888888888905609,
%U A034993 88888888888905609,888888888888769405062724,888888888888817576082400016,8888888888888825421477138436,888888888888888199001963335969,888888888888888832115283007868025
%N A034993 Smallest square starting with a string of n 8's.
%H A034993 Robert Israel, <a href="/A034993/b034993.txt">Table of n, a(n) for n = 1..300</a>
%p A034993 f:= proc(n) local q, k, x;
%p A034993   q:= 8*(10^n-1)/9;
%p A034993   for k from 0 do
%p A034993     x:= ceil(sqrt(q*10^k));
%p A034993     if x^2 < (q+1)*10^k then return x^2 fi
%p A034993   od
%p A034993 end proc:
%p A034993 map(f, [$1..20]); # _Robert Israel_, Jun 26 2018
%Y A034993 Cf. A034992.
%K A034993 nonn,base
%O A034993 1,1
%A A034993 _Patrick De Geest_, Nov 15 1998
%E A034993 More terms from _Robert Israel_, Jun 26 2018