program delitel;
var A,B: integer;
begin
read(A,B);
if B mod A=0 then write('да,является')
else write('нет,не является');
end.
Это были огромные, порой занимающие сотни квадратных метров площади, ламповые машины 50-х годов. Они работали на электровакуумных лампах, которых могло быть понатыкано тысячами.
Одной из первых ЭВМ была ENIAC, она представляла собой огромную машину длиной около 30-ти метров, содержала 18.000 электровакуумных ламп и потребляла около 150 киловатт.
Не было ни монитора, ни клавиатуры, ни мыши, для ввода данных использовали перфокарты или перфоленты. Эти машины обычно использовали для расчётов, где не применялись большие объёмы памяти.
Потом, в 1559 г. в США создали транзистор, который заменил электровакуумные лампы, наступило 2-ое поколение ЭВМ..
Программа получает со ввода значение H и выполняет табуляцию функции F(t,H)=11(t-H)²+13 на интервале [0;30]. На вывод поступает значение t, при котором функция F(t,H) принимает максимальное значение.
В задании требуется определить максимальную величину H, при которой функция F(t,H) на заданном интервале принимает максимальное значение для t=30, т.е. на правом конце интервала.
График функции F(t,H) - это квадратная парабола, ветви которой направлены вверх, поэтому максимальное значение такой функции достигается на одном или одновременно на обоих концах интервала. Для нашего случая
F(30,H) > F(0,H)
11(30-H)²+13 > 11(0-H)²+13
11(900-60H+H²)+13 > 11H²+13
9900-660H+11H²+13 > 11H²+13
9900-660H > 0 ⇒ H < 9900/660 или H<15.
В целых числах получаем H=14 (в программе H описывается как integer).
<u><em>Ответ:</em></u> H=14