var t,n,i,a,b,c:longint;
    f,g:text;
    x,y,z:char;

begin
assign(f,'cifra.in');
reset(f);
readln(f,t);
y:='0';
assign(g,'cifra.out');
rewrite(g);
for i:=1 to t do begin
   y:='0';
   while not eoln(f) do begin
                        x:=y;
                        read(f,y);
                        end;
   readln(f);
   n:=(ord(x)-ord('0'))*10+ord(y)-ord('0');
   a:=n div 20;
   n:=n mod 20;
   a:=(a*6) mod 10;
   case n of
      0,11,15:a:=a+0;
      1:a:=a+1;
      2,14:a:=a+5;
      3,7:a:=a+2;
      4,8:a:=a+8;
      5,17:a:=a+3;
      9,10,13:a:=a+9;
      12,16,19,6:a:=a+6;
      18:a:=a+7;
   end;
   writeln(g,a mod 10);
end;
close(g);
end.