var s:array[0..9] of set of byte;
  i,j:                   longint;
   s1:                    string;
 n,i1:                   longint;
      begin
       s[0]:=[7,12,15,19,0,4];
       s[1]:=[6,1];
       s[2]:=[];
       s[3]:=[];
       s[4]:=[8,3];
       s[5]:=[5,9,10,14,17,2];
       s[6]:=[16,11];
       s[7]:=[];
       s[8]:=[];
       s[9]:=[18,13];
       assign(input,'cifra.in');
       reset(input);
       assign(output,'cifra.out');
       rewrite(output);
       readln(n);
       for i1:=1 to n do begin
        readln(s1);
        if length(s1)>1 then
            j:=ord(s1[length(s1)-1])+ord(s1[length(s1)])-48*2 else
            j:=ord(s1[length(s1)])-48;
        j:=j mod 20;
        for i:=0 to 9 do
        if j in s[i] then break;
        writeln(i);
       end;
       close(output);
      end.