Напишите в ответе число, равное количеству различных значений входной переменной k, при которых приведённая ниже программа выводит тот же ответ, что и при входном значении k = 25. Значение k = 25 также включается в подсчёт количества различных значений k.
var k, i : longint;
function f\(n: longint\) : longint;
begin
f := n * n * n;
end;
begin
readln\(k\);
i := 1;
while f\(i\) < k do
i := i+1;
if f\(i\)-k <= k-f\(i\-1\) then
writeln\(i\)
else
writeln\(i\-1\);
end.