Какое наибольшее целое значение h нужно ввести чтобы программка напечатала число
Какое величайшее целое значение h необходимо ввести чтоб программка напечатала число 30. var a,b,t,M,R,H :integer; Function F(H, x: integer):integer; begin F := 11*(x-H)*(x-H)+13; end; BEGIN readln(h); a := 0; b := 30; M := a; R := F(H, a); for t := a to b do begin if (F(H, t) amp;gt; R) then begin M := t; R := F(H, t) end end; write(m); END.
Задать свой вопрос
Перед циклом вводится h и рассчитывается R = F(h,0).
В цикле для каждого целого t (0 lt;= t lt;= 30) вычисляются значения F(h,t) = 11(t-h)^2 +13. Cм. набросок http://bit.ly/2EhdwJs.
R и m меняются тогда, когда F(h, t) превосходит значение, присвоенное ранее R, иначе m = 0.
Функция F(h,t) на графике имеет вид параболы с направленными вверх ветвями. Минимум в точке t = h.
При h = 15 парабола симметрична условно t = 15. Значения функции в точках t = 0 и t = 30 одинаковы и R = F(15,0) в цикле превышено не будет.
Убавленье h симметрию нарушает. При h = 14 R(14,0) lt; F(14,30), после обработки условия m = 30. Соотношение правосудно для любых h lt; 15.
Ответ: h = 14.
-
Вопросы ответы
Статьи
Информатика
Статьи
Разные вопросы.
Қазақ тiлi.
Английский язык.
Математика.
История.
Экономика.
Экономика.
Русский язык.
Разные вопросы.
Математика.