type  
       sir=array[0..100] of byte;  
    var x,t,i,p,c,j:longint;  
    f,g:text;  
    s:string;  
    v:sir;  
    begin  
    v[0]:=0;  
    assign(f,'cifra.in'); reset(f);  
   assign(g,'cifra.out'); rewrite(g);  
   readln(f,t);  
   x:=0;  
   for i:= 1 to 100 do begin  
     p:=1;  
     c:= i mod 10;  
     for j:= 1 to i do  
       p:=p*c mod 10;  
     x:=(x+p) mod 10;  
     v[i]:=x;  
     end;  
   for j:=1 to t do  
       begin  
       readln(f,s);  
       s:='0'+s;  
       s:=copy(s,length(s)-1,2);  
       val(s,i,x);  
       writeln(g,v[i]);  
       end;  
   close(f); close(g);  
   end.