Result

WA

Code [DL]

00000000  6c 71 79 22 61 64 30 73  12 3d 40 61 2a 32 2b 40  |lqy"ad0s.=@a*2+@|
00000010  40 0a 1b 6c 71 63 30 30  30 1b 71 7a 37 40 79 22  |@..lqc000.qz7@y"|
00000020  62 63 63 12 3d 66 6d 6f  64 28 73 71 72 74 28 40  |bcc.=fmod(sqrt(@|
00000030  62 2a 38 2b 31 29 2c 31  29 3d 3d 30 0a 1b 6a 5e  |b*8+1),1)==0..j^|
00000040  6c 71 34 39 40 7a 5a 5a  0a                       |lq49@zZZ.|
00000049

Disassembly

lqy"ad0s<C-R>=@a*2+@@<NL><Esc>lqc000<Esc>qz7@y"bcc<C-R>=fmod(sqrt(@b*8+1),1)==0<NL><Esc>j^lq49@zZZ<NL>

stdin

01001110
00110111
00100100
11111101
10100001
00000011
11010010
10110010
00101101
10111101
00111000
01101001
01100100
01111000
00010101
01111010
01100101
10101111
00100010
11011010
00010111
11000000
00000000
00000110
01000010
10101011
00110011
00001111
11101110
00000110
00001010
10001000
10101000
00010101
10111110
10011001
10110100
00101010
11101000
11100111
10010010
00011100
01011111
01001101
10001111
10101101
11100001
01011011
11000101
00000001

stdout

0
55
00100100
11111101
10100001
00000011
11010010
10110010
00101101
10111101
00111000
01101001
01100100
01111000
00010101
01111010
01100101
10101111
00100010
11011010
00010111
11000000
00000000
00000110
01000010
10101011
00110011
00001111
11101110
00000110
00001010
10001000
10101000
00010101
10111110
10011001
10110100
00101010
11101000
11100111
10010010
00011100
01011111
01001101
10001111
10101101
11100001
01011011
11000101
00000001

stderr

strace