Result

AC

Code [DL]

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

stdin

11011101
11100111
11111101
10101111
00000110
00010000
01011011
00010110
00000011
10111110
10011001
11101001
11010110
00000111
10001110
10001000
10101100
00110111
11110110
11110000
11100001
00110000
00000000
10100110
01101001
00001010
11111101
01011111
10100100
01000001
00000001
01011101
10101011
01000010
01001110
11110011
10010111
00101101
00000101
00001111
11111101
00101010
00111010
01101111
11010010
00010101
01111000
11001110
00100100
00011100

stdout

01101010111000010100001011100010111001011000111011

stderr

strace