OFFSET
0,2
COMMENTS
LINKS
MATHEMATICA
Select[Range[0, 20000], BitXor[10*#, 11*#] == 21*# &] (* Paolo Xausa, Sep 29 2024 *)
PROG
(PARI) is(n)=bitxor(10*n, 11*n)==21*n \\ Charles R Greathouse IV, Sep 25 2024
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Feb 01 2006
STATUS
approved