Определите, количество чисел K, для которых следующая программа выведет такой же рЕзультат, что и для K = 22: var i, k: integer; function F(x:integer):integer; begin F:=x*x*x+x*x; end; begin i := 20; readln(K); while (i > 0) and (F(i) > K) do i:=i-1; writeln(i); end.
Езультат, что и для K = 22: var i, k: integer; function F(x:integer):integer; begin F:=x*x*x+x*x; end; begin i := 20; readln(K); while (i > 0) and (F(i) > K) do i:=i-1; writeln(i); end.
Ответы:
22-01-2019 08:54
У тебя функция x^3+x^2 и перебор от 20 до 1, т.е. x^3+x^2 будет больше 22 при числах:20, 19, 18, 17, 16, 15, 14, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3.итого: 18 чисел
Также наши пользователи интересуются:
ПОЖАЛУЙСТА, ПОМОГИТЕ С ХИМИЕЙ!!! Составить ионное уравнение: Mg (NO3) 2+ NaOH → Mg (OH) 2+NaNo3На машине мы проехали 128 км 600 м,а в автобусе -в 5 раз меньшее.Какое расстояние мы про
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Определите, количество чисел K, для которых следующая программа выведет такой же р» от пользователя ТАИСИЯ ВОРОБЕЙ в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!