var
i,n:longint;
begin
readln(n);
for i:=2 to trunc(sqrt(n)) do
if n mod i=0 then begin writeln(n div i); halt; end;
end.
肯定对