Result

AC

Code [DL]

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

Disassembly

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

stdin

01111000
00000011
10001000
11011111
01011011
10101000
10111110
11010010
11111101
11100111
00010101
11110001
00100100
10111110
01001110
00001010
01110111
10001001
10100010
10010100
00000110
01011011
10111100
10000101
00011100
11001000
01000010
10000010
00110001
00011101
01010010
10010010
00000000
00101101
00111011
11010011
01011001
00111100
10101011
01101001
00111110
00001111
11001110
11100110
00000001
10011000
00101111
10010000
00110111
10011001

stdout

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

stderr

strace