Result

AC

Code [DL]

:%s/.\+/\=!(float2nr(sqrt(("0b".submatch(0))*8+1)*99)%99)/
ZZ

Disassembly

:%s/.\+/\=!(float2nr(sqrt(("0b".submatch(0))*8+1)*99)%99)/<NL>ZZ

stdin

00110111
11100111
10010100
10010111
11101000
10001111
10101011
00010101
00001000
10001001
10001000
11010010
01111010
10101100
00111101
10011001
10101110
00001111
01101001
00100100
10111101
00111111
01010000
10111011
00011100
11100111
00001010
01001110
10100100
10111100
00101101
01010001
00000011
00000110
00000000
11010100
01000010
10111001
01101111
01111000
10000010
01011011
10100111
11111000
00001110
00000001
01000010
01111101
10111110
11111101

stdout

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

stderr

strace