var a:array[1..200] of byte;
   s,s1,j,t,k:integer;
n,i:longint;
f,g:text;
begin
assign(f,'cifra.in');
assign(g,'cifra.out');
rewrite(g);
reset(f);
s1:=0;
 for i:=1 to 100 do
 begin
   s:=1;
   for j:=1 to i do
   s:=(s*i) mod 10;
   s1:=(s1+s)mod 10;
   a[i]:=s1;
 end;
 readln(f,t);
 for k:=1 to t do
 begin
 readln(f,n);
{ s1:=0;
 for i:=1 to n do
 begin
   s:=1;
   for j:=1 to i do
   s:=(s*i) mod 10;
   s1:=(s1+s)mod 10;
 end;}
 if n mod 100=0 then s1:=a[100]
 else s1:=a[n mod 100];
 if k<t then
 writeln(g,s1)
 else write(g,s1);
 end;
 close(g);
 close(f);
end.