type lung=0..999999999;
var n,i,s,j,p,r,a:lung;
    c:string;
    f,g:text;
procedure suma(b:lung;var p:lung);
var k:lung;
begin
 p:=1;
 for k:=1 to b do
  p:=p*b;
end;
begin
 assign(f,'cifra.in');
 reset(f);
 assign(g,'cifra.out');
 rewrite(g);
 readln(f,n);
 for i:=1 to n do  begin
  readln(f,c);
  val(c,a);

  s:=0;
  for j:=1 to a do begin
   suma(j,r);
    s:=s+r;
    end;
  writeln(g,s mod 10);
  end;
 close(f);
 close(g);
end.