vim, 73 bytes

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 63 2a 38 2b 31 29 2c  31 29 3d 3d 30 0a 1b 6a  |@c*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(@c*8+1),1)==0<NL><Esc>j^q49@zZZ<NL>

stdin

10101000
10011110
01111110
00001111
01111000
00000010
01001111
11111001
01011010
01000010
00011100
00100100
11111100
11100111
11011011
11111000
11111101
00000001
10011001
11010010
00010101
10001000
11101101
10100110
10100011
00000110
10111110
00001010
00000000
01011011
00000011
10100111
11100000
01101001
00101101
01011101
11001000
11110101
11111101
00101111
10101011
01100010
11000101
10001000
01010001
01001110
00111010
01111010
00101001
00110111

stdout

1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1

stderr

strace