module a;real x;initial repeat(50)$write($fscanf(1<<31,"%b",x*8)+x-1);endmodule