program cifra;
var f,g:text;
    n,i,j,nr,err:longint;
    k:string;
    c:byte;
begin
assign(f,'cifra.in'); reset(f);
assign(g,'cifra.out'); rewrite(g);
readln(f,n);
for i:=1 to n do begin
      readln(f,k);
      if length(k)>1 then
      nr:=(ord(k[length(k)-1])-ord('0'))*10 +ord(k[length(k)])-ord('0')
       else nr:=ord(k[1])-ord('0');
      c:=0;
      for j:=1 to nr do begin
      case j mod 10 of
           1:c:=c+1;
           5:c:=c+5;
           6:c:=c+6;
           4:c:=c+6;
           9:c:=c+9;
           2:if j mod 4=0 then c:=c+6
                          else c:=c+4;
           3:if (j div 10) mod 2=0 then c:=c+7
                                   else c:=c+3;
           7:if (j div 10) mod 2=0 then c:=c+3
                                   else c:=c+7;
           8:if j mod 4=0 then c:=c+6
                          else c:=c+4;
                end;
           c:=c mod 10;
           end;
           writeln(g,c);
           end;
close(f); close(g);
end.