Table[(x*BitAnd[x, 2^(y-1)])/(2^(y-1)), {x, 1, 100}] where y=1

• Natural Language
• Math Input