Program suma_numaru_diviz;
 var a:array [1..1000000] of boolean;
   n,k,s,t,l,p,d:int64;
   i,j:longword;
   fi,fo:text;
begin
assign(fi,'ssnd.in');
 assign(fo,'ssnd.out');
reset(fi);
 rewrite(fo);
readln(fi,t);
  for i:=2 to 1000000 do
                if not a[i] then
                  for j:=2 to 1000000 div i do
                                     a[i*j]:=true;
                                     k:=1;  s:=1;
for i:=1 to t do begin
 readln(fi,n);
 if (a[n]=true) or (n>1000000) then
  for j:=2 to trunc(sqrt(n)) do
   if (a[j]=false) and (n mod j=0) then begin
                                          p:=1; d:=0; l:=n;
                                          repeat
                                           l:=l div j;
                                            inc(d);
                                            p:=p*j;
                                           until l mod j<>0;
                                          k:=k*(d+1) mod 9973;
                                          s:=s*trunc((p*j-1)/(j-1)) mod 9973;
                                          end;
  if a[n]=false then begin
                      k:=2;
                       s:=(n+1) mod 9973;
                      end;
         writeln(fo,k mod 9973,' ',s mod 9973);
 k:=1; s:=1;
end;
close(fo);
end.