Program p1;
  var s:ansistring;
  x,x1,n,code,sum,sum1,sum2,t,i:integer;
  f,g:text;
 begin
 assign(f,'cifra.in');reset(f);
 assign(g,'cifra.out');rewrite(g);
 readln(f,t);
 for i:=1 to t do begin x:=0;x1:=0;
 readln(f,s);
 val(s[length(s)],x,code);
 case x of
 1:sum1:=1;
 2:sum1:=5;
 3:sum1:=2;
 4:sum1:=8;
 5:sum1:=3;
 6:sum1:=9;
 7:sum1:=2;
 8:sum1:=8;
 9:sum1:=7;
 0:sum1:=0;
 end;
 if length(s)>1 then
          val(s[length(s)-1],x1,code);
 sum2:=7*x1;
 sum:=sum1+sum2;
 writeln(g,sum mod 10);
 end;
 close(g);
 end.