program _07;
type sir=array[1..10000] of longint;
var t,n:longint;
    f,g:text;
    a:sir;

procedure citire;
var i:integer;
begin
assign (f,'cifra.in'); reset (f);
readln (f,t);
for i:=1 to t do readln (f,a[i]);
close (f);
end;

procedure calcul;
var i,j,k:integer;
    q,s:longint;
begin
assign (g,'cifra.out'); rewrite (g);
for i:=1 to t do begin
   s:=0;
   for j:=1 to a[i] do begin
      q:=1;
      for k:=1 to j do q:=q*j;
      s:=s+q
   end;
   writeln (g,s mod 10);
end;
close (g);
end;

begin
citire;
calcul;
end.