Объясните,пожалуйста,поподробней!!!!! Определите, количество чисел k, для которых следующая программа выведет такой же результат, что и для k = 10? Паскаль var k, i : lon gint; 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.
gint; 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.
Ответы:
04-03-2019 12:14
Также наши пользователи интересуются:
Составь задачу на кратное сравнение первым действием решения которой будет действие -сложения.вычитания Арбуз - рекордсмен среди продуктов питания по содержанию воды.В 1 кг арбуза на мякоть приходится 100г, а остальное-на воду.Сколько воды ты выпьешь, съев 1 кг арбуза? Какую час![Картинка с текстом вопроса от пользователя Анита Кочергина](https://shpora.org/question/8191955-obyyasnitepoghaluystapopodrobney-opredelite-kolichestvo-chisel-k-dlya-kotoryh-sleduyuschaya-programma-vyvedet-takoy-ghe-rezulytat-chto-i-dlya-k-=-10-paskaly-var-k-i-lon-.jpg)
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Объясните,пожалуйста,поподробней!!!!! Определите, количество чисел k, для которых следующая программа выведет такой же результат, что и для k = 10? Паскаль var k, i : lon » от пользователя Анита Кочергина в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!