|
%I #22 Sep 08 2023 00:32:21
%S 6,6,26,126,62501,625000001,625000000000000001,
%T 625000000000000000000000000000000001,
%U 625000000000000000000000000000000000000000000000000000000000000000000001
%N Similar to A123872 but with a(0)=6 as seed.
%D G. Balzarotti and P. P. Lava, Le sequenze di numeri interi, Hoepli, 2008, p. 99.
%H Bert Dobbelaere, <a href="/A123874/b123874.txt">Table of n, a(n) for n = 0..15</a>
%e a(0)=6;
%e a(1)=6 because 6*6 = 36;
%e a(2)=26 because 36*26 = 936;
%e a(3)=126 because 936*126 = 117936;
%e a(4)=62501 because 117936*62501 = 7371117936.
%p P:=proc(q,h) local a,b,k,n; a:=h; b:=ilog10(a)+1; print(h);
%p for k from 1 to 10 do for n from 2 to q do
%p if ((a*n) mod 10^b)=a then print(n); a:=a*n; b:=ilog10(a)+1;
%p break; fi; od; od; end: P(10^9,6);
%Y Cf. A123872.
%K nonn,base
%O 0,1
%A _Paolo P. Lava_ and _Giorgio Balzarotti_, Oct 17 2006, Oct 24 2006
%E More terms from _Bert Dobbelaere_, Aug 08 2023
| 