var t,j,uc:integer;
    n:int64;
    i:longint;
    f,g:text;

 procedure uci(i:longint; var uc:integer);
  var j,u,p:integer;
  begin
   p:=i mod 4;
   if p=0 then p:=4;
   i:=i mod 10;
   u:=1;
   for j:=1 to p do u:=u*i;
   uc:=(uc+u) mod 10;
  end;

begin
  assign(f,'cifra.in');
  assign(g,'cifra.out');
  reset(f);
  rewrite(g);
  readln(f,t);
  for j:=1 to t do
    begin
    readln(f,n);
    uc:=1;
    for i:=2 to n do uci(i,uc);
    writeln(g,uc);
    end;
  close(f);
  close(g);
end.