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

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

10111000
01111010
11000100
11100101
10111001
00000000
11010010
00000110
01001110
10111110
11100001
01101111
00001111
00101110
10011001
00011100
10010111
10110001
11010110
00010101
01011011
00100100
11111101
00101101
00001010
00110111
01100110
00010111
10100110
10001000
10011110
10101111
00000011
01111000
00110101
00110111
10010110
00001101
01111101
10101000
00000001
00010001
11100111
01000010
10011101
01101001
10010001
01101001
10101011
10000100

stdout

0
122
11000100
11100101
10111001
00000000
11010010
00000110
01001110
10111110
11100001
01101111
00001111
00101110
10011001
00011100
10010111
10110001
11010110
00010101
01011011
00100100
11111101
00101101
00001010
00110111
01100110
00010111
10100110
10001000
10011110
10101111
00000011
01111000
00110101
00110111
10010110
00001101
01111101
10101000
00000001
00010001
11100111
01000010
10011101
01101001
10010001
01101001
10101011
10000100

stderr

strace