Result

WA

Code [DL]

:for i in range(51)
call setline(i,!(float2nr(sqrt(0+("0b".getline(i)."001"))*99%99)))
endfor
ZZ

Disassembly

:for i in range(51)<NL>call setline(i,!(float2nr(sqrt(0+("0b".getline(i)."001"))*99%99)))<NL>endfor<NL>ZZ

stdin

01000010
01001010
10010110
11100111
10001000
11100010
10110111
01011101
00001111
00000000
10011111
00000001
11101011
11100000
01100001
01111000
00100000
11100110
10011001
01010101
10100001
01011011
00000110
01111111
00011110
00000011
11100111
10111110
00001010
11010101
11100001
00101101
11111101
10101100
01011011
10010101
00011100
01011100
00001110
01101001
11010010
00100100
10000011
10101011
00000100
00010101
10011100
01101010
00110111
01001110

stdout

0100001

01001010
10010110
11100111
10001000
11100010
10110111
01011101
00001111
00000000
10011111
00000001
11101011
11100000
01100001
01111000
00100000
11100110
10011001
01010101
10100001
01011011
00000110
01111111
00011110
00000011
11100111
10111110
00001010
11010101
11100001
00101101
11111101
10101100
01011011
10010101
00011100
01011100
00001110
01101001
11010010
00100100
10000011
10101011
00000100
00010101
10011100
01101010
00110111
01001110

stderr

strace