Задание

Напишите в ответе наибольшее значение входной переменной k, при котором программа выдаёт ответ 7.
var k, i : longint;
function f\(n: longint\): longint;
begin
f := n * n * n
end;
begin
readln\(k\);
i := 20;
while f\(i\) > k do
i := i-1;
writeln\(i\)
end.