Какое наибольшее целое значение h нужно ввести чтобы программа напечатала число 30. var a,b,t,M,R,H :integer; Function

Перед циклом вводится h и рассчитывается R = F(h,0).

В цикле для каждого целого t  (0 <= t <= 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) < F(14,30), после обработки условия m = 30.  Соотношение справедливо для любых h < 15.   

Ответ: h = 14.