var n,a,i,x,k:integer;

begin
readln(n);

for i:=1 to n do begin
 readln(a);
  x:=1;
  k:=1;
  repeat
  x:=x+k;
  k:=k+1;
  until a-x<=0;
  if a=x then write('1',' ') else write('0',' ');
end;

end.