vim, 153 bytes

Result

AC

Code [DL]

:for i in range(51)
let l=getline(i)
call setline(i,!(float2nr(sqrt(1+64*(l[0]*16+l[1]*8+l[2]*4+l[3]*2+l[4])+l[5]*32+l[6]*16+l[7]*8)*99)%99))
endfor
:wq

Disassembly

:for i in range(51)<NL>let l=getline(i)<NL>call setline(i,!(float2nr(sqrt(1+64*(l[0]*16+l[1]*8+l[2]*4+l[3]*2+l[4])+l[5]*32+l[6]*16+l[7]*8)*99)%99))<NL>endfor<NL>:wq<NL>

stdin

01001110
11111101
01101001
01110100
11101100
00001010
11100111
00000100
10101011
00000110
10011001
10011010
00011100
01101000
10100100
00101101
11011110
10110000
00010101
10111110
00110000
11111011
00000000
00100100
11010010
00001111
00000011
01011011
11000010
10001000
00111010
00010011
10010001
01111000
01100001
00101110
11011001
11000011
00110111
01000010
10101110
10110010
00000001
01100010
01011011
00100100
01101100
10101111
11001001
11101111

stdout

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

stderr

strace