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

%I A067031
%S A067031 1,3,5,7,9,13,15,17,19,20,21,23,24,25,26,27,28,29,30,31,32,34,35,36,37,
%T A067031 38,39,40,41,42,43,45,46,47,48,49,50,51,52,53,54,56,57,58,59,60,61,62,
%U A067031 63,64,65,67,68,69,70,71,72,73,74,75,76,78,79,80,81,82,83,84,85,86,87
%N A067031 Numbers n that are not of the form k + reverse(k) for any k.
%e A067031 3 belongs to the sequence since there is no k such that k + reverse(k) 
               = 3.
%o A067031 (ARIBAS): function a067031(a,b: integer); var k,n,i,rev: integer; test: 
               boolean; st,nst: string; begin for n := a to b do k := 0; test := 
               1; while test and 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 test := 0; else inc(k); end; end; if k > n then 
               write(n,","); end; end; end; a067031(0,100);.
%Y A067031 Complement of A067030.
%Y A067031 Cf. A033865, A067030, A067032, A067033, A067034.
%Y A067031 Sequence in context: A121388 A161700 A063081 this_sequence A029740 A063425 
               A064608
%Y A067031 Adjacent sequences: A067028 A067029 A067030 this_sequence A067032 A067033 
               A067034
%K A067031 base,easy,nonn
%O A067031 0,2
%A A067031 Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Dec 29 2001

Search completed in 0.001 seconds