Консультация № 188745
29.01.2016, 23:05
0.00 руб.
0 1 1
Здравствуйте! Прошу помощи в следующем вопросе:
Напишите в ответе наименьшее значение входной переменной 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.

Обсуждение

давно
Посетитель
7438
7205
01.02.2016, 16:14
общий
это ответ
Здравствуйте, Посетитель - 399097!
k = 20
Т.к. при этом значении условие последний раз выполнится (f(20) = 20*g(20)) и при этом i увеличится на 1 и станет равным 21
Об авторе:
"Если вы заметили, что вы на стороне большинства, —
это верный признак того, что пора меняться." Марк Твен
Форма ответа