Result

AC

Code [DL]

00000000  71 7a 22 61 78 22 62 78  22 63 78 22 64 78 22 65  |qz"ax"bx"cx"dx"e|
00000010  78 22 66 78 22 67 78 73  12 3d 66 6d 6f 64 28 73  |x"fx"gxs.=fmod(s|
00000020  71 72 74 28 28 40 61 2a  31 32 38 2b 40 62 2a 36  |qrt((@a*128+@b*6|
00000030  34 2b 40 63 2a 33 32 2b  40 64 2a 31 36 2b 40 65  |4+@c*32+@d*16+@e|
00000040  2a 38 2b 40 66 2a 34 2b  40 67 2a 32 2b 40 40 29  |*8+@f*4+@g*2+@@)|
00000050  2a 38 2b 31 29 2c 31 29  3d 3d 30 0a 1b 6a 5e 71  |*8+1),1)==0..j^q|
00000060  34 39 40 7a 5a 5a 0a                              |49@zZZ.|
00000067

Disassembly

qz"ax"bx"cx"dx"ex"fx"gxs<C-R>=fmod(sqrt((@a*128+@b*64+@c*32+@d*16+@e*8+@f*4+@g*2+@@)*8+1),1)==0<NL><Esc>j^q49@zZZ<NL>

stdin

11100111
00000011
11111101
10101011
00101101
00001101
10011001
01101001
10111110
11101001
10001000
10110000
11010010
00000101
01111000
01000010
01010010
11101100
11001011
00101100
00110111
11000110
00110101
01001110
10111100
11011000
00001010
11011100
01010000
00001111
00000001
00000001
01111111
01011011
01100011
10001110
10100000
00111101
11101110
11010111
01110000
00000000
00100100
00000110
01000000
01001001
10101011
00010101
00011100
01111110

stdout

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

stderr

strace