Напишите в ответе наибольшее значение входной переменной k, при котором программка

Напишите в ответе величайшее значение входной переменной k, при котором программа выдаёт тот же ответ, что и при входном значении k = 16.
var k, i : longint;
function f(n: longint): longint;
begin
f := n * n * n;
end;
function g(n: longint): longint;
begin
g := 3*n + 3;
end;
begin
readln(k);
i := 1;
while f(i) lt; g(k) do
i := i+1;
writeln(i)
end.

Задать свой вопрос
1 ответ
Вот значения при которых мы получим таковой ответ:
9 10 11 12 13 14 15 16 17 18 19 20
Наивеличайшее = 20.

Прости, отыскал я это неразумным способом поставив цикл for k:0 to 1000000
и выводя все значения. Ибо нету медли разбираться... Не знаю так-же что такое longint , позже непременно для себя осмотрю что это :)

Вот пример того как я это отыскал, хоть медот и тупой, но он работает:
var k, i,max,m : longint;
 function f(n: longint): longint; 
begin f := n * n * n; 
end; 
function g(n: longint): longint;
 begin g := 3*n + 3; 
end; 
begin i := 1; 
for k:=0 to 1000000 do begin
while f(i) lt; g(k) do i := i+1;
 if i=4 then writeln(k);
end;
end.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт