var exp : int, i : int, n : int;
begin
assume(n >= 2);
exp = 1;
i = 1;
n = 0 + 1*n;
while(i <= exp) do
exp = 0 + 1*exp*n;
i = 1 + 1*i;
n = 0 + 1*n;
done;
end