type vector=array[1..20]of byte;
const sum:vector=(1,5,2,8,3,9,2,8,7,7,8,4,7,3,8,4,1,5,4,0);
var rasp,t,i,nr,j,e:integer;
    fi,fo:text;
    s:string;
    c:array[0..101]of byte;
begin
     assign(fi,'cifra.in'); reset(fi);
     assign(fo,'cifra.out'); rewrite(fo);
     readln(fi,t);
     for i:=1 to t do
        begin
             readln(fi,s);
             c[0]:=0;
             for j:=length(s) downto length(s)-3 do
                 val(s[j],c[j],e);
             nr:=c[length(s)-1]*10+c[length(s)];
             if nr=0 then rasp:=0 else
             rasp:=sum[nr mod 20];
             writeln(fo,rasp);
        end;
     close(fi);
     close(fo);
end.