var j,i,s,p:longint;
    t,h:word;
    n:array[1..100000000]of longint;
    f,g:text;
begin
 assign(f,'cifra.in');
 reset(f);
 readln(f,t);
 for i:=1 to t do
  readln(f,n[i]);
  close(f);
  assign(g,'cifra.out');
  rewrite(g);
  for h:=1 to t do begin
   s:=0;
   for i:=1 to n[h] do begin
    P:=1;
    for j:=1 to i do
     p:=p*i;
    s:=s+p;
    end;
    writeln(g,s mod 10);
   end;
   close(g);
end.