by@hakatashi
AC
00000000 71 7a 43 12 3d 66 6d 6f 64 28 73 71 72 74 28 73 |qzC.=fmod(sqrt(s| 00000010 74 72 32 6e 72 28 40 40 2c 32 29 2a 38 2b 31 29 |tr2nr(@@,2)*8+1)| 00000020 2c 31 29 3d 3d 30 0a 1b 77 71 34 39 40 7a 5a 5a |,1)==0..wq49@zZZ| 00000030
qzC<C-R>=fmod(sqrt(str2nr(@@,2)*8+1),1)==0<NL><Esc>wq49@zZZ
10111000 01000010 00011100 00000011 10011001 10100010 01111001 11000101 00101000 10101011 00111010 00001101 00110111 11101100 11101101 10001000 00010101 10000000 01100101 10000101 00101101 00100100 11111010 11010010 11011000 01001110 10111110 10101011 11111011 00000001 01101001 11111100 00000110 01011011 00000000 00011011 00001010 00001111 10111001 11111101 11110000 11100010 10110101 01111000 10000111 01100000 01010110 01111000 11100111 01000011
0 1 1 1 1 0 0 0 0 1 0 0 1 0 0 1 1 0 0 0 1 1 0 1 0 1 1 1 0 1 1 0 1 1 1 0 1 1 0 1 0 0 0 1 0 0 0 1 1 0