WolframAlpha computational knowledge AI
Table[BitAnd[x, 2^y], {x, 1, 26}, {y, 0, 4}]