Размещено 5 лет назад по предмету
Информатика
от 98veta
Напишите в ответе наименьшее значение входной переменной k, при
котором программа выдаёт ответ 21. Для Вашего удобства программа
приведена на пяти языках программирования.
var
k, i : longint;
function f(n: longint): longint;
begin
f := n * n * n;
end;
function g(n: longint): longint;
begin
g := n*n;
end;
begin
readln(k);
i := 1;
while f(i) <= k*g(i) do
i := i+1;
writeln(i)
end.