A123875 - OEIS

%I #11 Sep 04 2014 08:48:16

%S 8,6,26,626,15626,1562500001

%N Similar to A123872 but with a(0)=8 as seed.

%D G. Balzarotti and P. P. Lava, Le sequenze di numeri interi, Hoepli, 2008, p. 99.

%e a(0)=8;

%e a(1)=6 because 8*6 = 48;

%e a(2)=26 because 48*26 = 1248;

%e a(3)=626 because 1248*626 = 781248;

%e a(4)=15626 because 781248*15626 = 12207781248.

%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,8);

%K nonn,base,more

%O 0,1

%A _Paolo P. Lava_ and _Giorgio Balzarotti_, Oct 17 2006, Oct 24 2006