var t,ucif,r,i,j,k,p,sum:longint;
    n:array[1..30000] of integer;
    f,g:text;
begin
     assign(f,'cifra.in');
     reset(f);
     readln(f,t);
     assign(g,'cifra.out');
     rewrite(g);
     for i:=1 to t do readln(f,n[i]);
     for i:=1 to t do begin
         sum:=0;
         for j:=1 to n[i] do begin
             ucif:=j mod 10;
             r:=j mod 4;
             if r=0 then r:=4;
             p:=1;
             for k:=1 to r do p:=p*ucif;
             sum:=(sum+p) mod 10;
         end;
         writeln(g,sum);
     end;
     close(f);
     close(g);
end.