%I A070635
%S A070635 0,0,0,0,0,0,0,0,0,0,1,0,1,4,3,2,1,0,9,0,0,2,3,0,4,2,0,8,7,0,3,2,3,6,3,
%T A070635 0,7,5,3,0,1,0,1,4,0,6,3,0,10,0,3,3,5,0,5,1,9,6,3,0,5,6,0,4,10,6,2,12,
%U A070635 9,0,7,0,3,8,3,11,7,3,15,0,0,2,6,0,7,2,12,8
%N A070635 n mod (sum of digits of n).
%C A070635 a(A005349(n)) = 0. - Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), 
               Mar 10 2008
%p A070635 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; print(i mod w); od; 
               end: P(1000); - Paolo P. Lava (ppl(AT)spl.at), Feb 06 2007
%Y A070635 Cf. A007953.
%Y A070635 Sequence in context: A066440 A071692 A030586 this_sequence A110366 A090284 
               A093580
%Y A070635 Adjacent sequences: A070632 A070633 A070634 this_sequence A070636 A070637 
               A070638
%K A070635 nonn,base
%O A070635 1,14
%A A070635 Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), May 13 2002