var s:array[0..9] of set of byte;
  i,j:                   longint;
   s1:                    string;
 n,i1:                   longint;
   b1:array[1..1 shl 12] of char;
      begin
       s[0]:=[43,47,64,68,71,75,92,96,99,0];
       s[1]:=[1,17,29,30,33,45,54,66,82,98];
       s[2]:=[3,7,24,28,31,35,52,56,59,60];
       s[3]:=[5,14,26,42,58,61,77,89,90,93];
       s[4]:=[12,16,19,20,63,67,84,88,91,95];
       s[5]:=[2,18,21,37,49,50,53,65,74,86];
       s[6]:=[23,27,44,48,51,55,72,76,79,80];
       s[7]:=[9,10,13,25,34,46,62,78,81,97];
       s[8]:=[4,8,11,15,32,36,39,40,83,87];
       s[9]:=[6,22,38,41,57,69,70,73,85,94];
       assign(input,'cifra.in');
       reset(input);
       settextbuf(input,b1);
       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])-48)*10+ord(s1[length(s1)])-48 else
            j:=ord(s1[length(s1)])-48;
        j:=j mod 100;
        for i:=0 to 9 do
        if j in s[i] then break;
        writeln(i);
       end;
       close(output);
      end.