Result

WA

Code [DL]

module a;real x,y;initial repeat(50)begin
y=$fscanf(1<<31,"%b",x);
$write("%d",(8*x**0.5+1)%2==1);
end endmodule

stdin

00000011
01101001
00001010
00100100
00100111
10110011
10001000
00011100
00011101
00010101
10111010
01010010
01000100
01000101
00101111
00011000
11111101
00110101
00111100
11010100
00000000
00101101
01111000
10111111
00000001
01101101
10100010
10001000
10010110
11110011
10011001
10100001
00001111
01111110
01011001
01011100
11100111
10010001
10110000
01101001
01000110
11010010
11010110
01011011
01001110
00000110
10111110
00110111
01000010
10101011

stdout

00010000000000000000100010000000000000000000000000

stderr

strace