Search: id:A067034
Results 1-1 of 1 results found.

%I A067034
%S A067034 0,1,2,3,4,5,10,6,7,8,9,20,30,40,50,60,70,80,90,100,91,110,93,120,94,
%T A067034 95,130,96,97,140,98,99,150,200,160,210,170,220,180,230,190,240,250,
%U A067034 300,260,310,270,320,280,330,290,340,350,400,360,410,370,420,380,430
%N A067034 Largest k such that A067030(n) = k + reverse(k).
%e A067034 a(12) = 30 since A067030(12) = 33 and 30 is the largest k such that 33 
               = k + reverse(k).
%o A067034 (ARIBAS): function a067034(a,b: integer); var n,k,m,i,rev: integer; st,
               nst: string; begin for n := a to b do k := 0; m := -1; while k <= 
               n do st := itoa(k); nst := ""; for i := 0 to length(st) - 1 do nst 
               := concat(st[i],nst); end; rev := atoi(nst); if n = k + rev then 
               m := k; end; inc(k); end; if m >= 0 then write(m,","); end; end; 
               end; a067034(0,500);.
%Y A067034 Cf. A033865, A067031, A067031, A067032, A067033.
%Y A067034 Sequence in context: A115895 A116017 A067033 this_sequence A039697 A072620 
               A072619
%Y A067034 Adjacent sequences: A067031 A067032 A067033 this_sequence A067035 A067036 
               A067037
%K A067034 base,easy,nonn
%O A067034 0,3
%A A067034 Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Dec 29 2001

Search completed in 0.001 seconds