Search: id:A128244 Results 1-1 of 1 results found. %I A128244 %S A128244 1,2,3,4,5,6,7,8,9,1,2,3,4,5,6,7,8,9,0,2,3,4,5,6,7,8,9,0,1,3,4,5,6,7,8, %T A128244 9,0,1,2,4,5,6,7,8,9,0,1,2,3,5,6,7,8,9,0,1,2,3,4,6,7,8,9,0,1,2,3,4,5,7, %U A128244 8,9,0,1,2,3,4,5,6,8,9,0,1,2,3,4,5,6,7,9,0,1,2,3,4,5,6,7,8,1,2,3,4,5,6 %N A128244 Let be s the sum of the digits of n; a(n) is the product of the digits of s. %C A128244 The sequence is equal to A053837 up to the 488th term. %e A128244 a(345)=2 because 3+4+5=12 and 1*2=2 %p A128244 P:=proc(n) local i,k,w; for i from 1 by 1 to n do w:=0; k:=i; while k> 0 do w:=w+k-(trunc(k/10)*10); k:=trunc(k/10); od; k:=w; w:=1; while k>0 do w:=w*(k-(trunc(k/10)*10)); k:=trunc(k/10); od; print(w); od; end: P(500); %Y A128244 Cf. A053837. %Y A128244 Sequence in context: A071650 A037265 A053837 this_sequence A010888 A131650 A033930 %Y A128244 Adjacent sequences: A128241 A128242 A128243 this_sequence A128245 A128246 A128247 %K A128244 easy,nonn,base %O A128244 0,2 %A A128244 Paolo P. Lava & Giorgio Balzarotti (ppl(AT)spl.at), May 03 2007 Search completed in 0.001 seconds