by@xuzijian629_key
WA
module a;real x,y;initial repeat(50)begin
y=$fscanf(1<<31,"%b",x);
$write("%d\n",(8*x+1)**0.5==1);
end endmodule10001000 00010010 11011111 10111110 11010010 00000011 01110000 01000111 01001000 11001010 01010111 00101001 11010110 10101011 00000000 00000001 01101100 01010100 01111000 00000110 01011011 01101001 00001010 00100100 00001111 11111101 01111000 11000111 11011101 00010101 01111110 10011001 00101111 00101101 11110110 11100111 00001101 10101110 00110111 11110101 10111010 01000010 00100100 01001111 10010011 00111011 10100010 11011010 00011100 01001110
0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0