Result

WA

Code [DL]

module a;integer i,j,x,c;initial begin for(i=0;i<50;i=i+1)begin c=$fscanf(32'h80000000,"%b",x);for(j=0;j<=x;j=j+1)begin c=c+(j*(j+1)/2==x); end $write("%d",1-c);end end endmodule

stdin

11000000
00001111
10111110
01111000
10001101
10001001
01100011
11100111
11010000
00110111
01110000
10100100
00011110
00000011
01101011
11111101
00000000
00010101
00000001
00000110
11011101
10110100
01101001
00111110
00000110
11000111
10001000
11110001
10101011
01011011
00001010
01010101
11101011
10100011
00011100
00100000
00000010
01001110
11001000
01001110
00101101
11010010
10100111
00100111
00100100
10011001
01000010
10001011
00101110
00101111

stdout

          0         -1         -1         -1          0          0          0         -1          0         -1          0          0          0         -1          0         -1         -1         -1         -1         -1          0          0         -1          0         -1          0         -1          0         -1         -1         -1          0          0          0         -1          0          0         -1          0         -1         -1         -1          0          0         -1         -1         -1          0          0          0

stderr

strace