program ucif;
var i,us,p,e,t,er,j:integer; f,g:text;nr:string[101];l:1..101;m:0..9;
begin
assign (f,'cifra.in');reset(f);
assign (g,'cifra.out');rewrite(g);
readln(f,t);

for i:=1 to t do begin
    readln(f,nr); {citesc pe rand nr. din fisier}
    l:=length(nr);{l=nr. de cifre din stringul reprezentat de nr.}
    val(nr[l],m,er);{iau ultima cifra a nr}
 p:=1; us:=0;
 j:=1;
 repeat
 p:=1;
 for e:=1 to j do
  p:= p*j mod 10;
 us:=(us+p) mod 10;
 inc(j);
 until j>m ;
writeln(g,us);
end;
close(f);
close(g);
end.