program p2;
var f:text;
    a,b,i,p1,e,p,d:longint;
begin
assign(f,'numere2.in');reset(f);
read(f,p);
close(f);
if p=1 then begin
            a:=1;
            b:=1;
            end
       else begin
            i:=1;
            repeat
            i:=i+1;
            e:=0;
            p1:=1;
            repeat
            p1:=p1*i;
            e:=e+1;
            until p1>=p;
            if p1=p then d:=1;
            until d=1;
            a:=i;
            b:=e;
            end;
assign(f,'numere2.out');rewrite(f);
writeln(f,a);
writeln(f,b);
close(f);
end.