by@satos___jp
AC
module a;integer i,j,x,c;initial begin for(i=0;i<50;i=i+1)begin c=$fscanf(32'h8000_0000,"%b",x);for(j=0;j<=x;j=j+1) begin if (j*(j+1)/2==x) begin c = 0;end end $write("%d",1-c);end end endmodule
00100100 11111101 00110010 01010011 11010010 00000011 01011011 11011101 11010010 00110111 11011111 10001000 00001111 00010101 10111011 00011100 00011000 01101000 00101110 10111111 01001110 00000111 01100110 01111000 01001011 10110101 11010110 10011001 00000000 01111111 01010001 01000001 01100010 01010000 01000010 11100111 01101001 10100111 10101011 00101111 10111110 00000001 11011000 00001000 10001101 00000011 00001010 11100010 00000110 00101101
1 1 0 0 1 1 1 0 1 1 0 1 1 1 0 1 0 0 0 0 1 0 0 1 0 0 0 1 1 0 0 0 0 0 1 1 1 0 1 0 1 1 0 0 0 1 1 0 1 1