FUNCTION

if you want a solution that isn't a macro you can try:

=LET(in, A1:A7, 
         n, ROWS(in), 
         c, SEQUENCE(n)*SIGN(BITAND(SEQUENCE(1, 2 ^ n),  2 ^ SEQUENCE(n, 1, 0))),
         IF(c,INDEX(in,c),"")
         )