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 49 30 30  1b 5e 71 7a 6c 36 40 79  |@..lqI00.^qzl6@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 71 34 39 40 7a 5a 5a  0a                       |^q49@zZZ.|
00000049

Disassembly

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

stdin

00110111
00000011
11011110
10101101
01010011
00011100
11100111
01001110
00000000
11101110
00100100
00001010
01110110
01111000
00111010
00101101
00011111
10111001
11010010
01011011
11111000
10011000
00000001
10011001
10111011
11100110
11111101
00001111
01111001
00000110
01101111
10000001
00100100
10001000
01101001
10001001
10001100
10101011
01000010
00010101
00111111
01000001
11000001
11011011
01101011
00110111
10110000
10111110
01000100
00110000

stdout

0
0
0
1
0
0
0
0
1
0
0
0
0
0
0
0
0
0
0
0
0
0
1
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0

stderr

strace