var v:array[0..100]of longint;
    n,i,j,k,x,t,p:longint;
    s,u:string;
    f1,f2:text;
begin
   assign(f1,'cifra.in');
   reset(f1);
   assign(f2,'cifra.out');
   rewrite(f2);
   for i:=1 to 100 do
   begin
   p:=1;
   for j:=1 to i do
   p:=(p*i)mod 10;
   v[i]:=(p+v[i-1])mod 10;
   end;
   readln(f1,t);
   for i:=1 to t do
   begin
   readln(f1,s);
   u:='';
   if length(s)=1 then u:=u+s[1]
                  else begin u:=u+s[length(s)-1];
                             u:=u+s[length(s)];
                       end;
   val(u,k,x);
   if k=0 then k:=100;
   writeln(f2,v[k]);
   end;
   close(f1);
   close(f2);
end.