Мишки Кеша и Тучка решили сделать на Лисичкин День рождения салют из n фейерверков. Они решили расставить фейерверки вдоль прямой с k различными лунками для фейерверков. В целях безопасности Кеша с Тучкой решили расставить фейерверки так, чтобы минимальное расстояние между ними было как можно больше. Однако для полной безопасности и этого недостаточно, так как если расстояние между двумя фейерверками меньше или равно 1, то они взрываются и могут поранить мишек. Вам нужно выяснить смогут ли Тучка с Кешей, соблюдая все правила безопасности, устроить салют из n фейерверков. Входные данные
Первая строка содержит два целых числа k (2≤k≤104) и n (2≤n≤k) — число лунок для фейерверков и число фейерверков.
Вторая строка содержит k натуральных чисел xi, расположенных по возрастанию, — координаты позиций (xi≤109).
Выходные данные
Если мишки не смогут устроить салют, выведите «NO» (без кавычек). Иначе в первой строке выведите «YES» (без кавычек), а во второй строке выведите одно целое число — наибольшее минимальное возможное допустимое расстояние между двумя фейерверками.
Система оценки
Максимальный за задачу: 100.
Примеры
входные данные
4 4
1 3 5 7
выходные данные
YES
2
входные данные
2 2
3 4
выходные данные
NO
Майкл предпочитает баскетбол и играет лучше, чем амереканец => Майкл не амереканец, Майкл - баскетболист
Израильтянин Саймон играет лучше тенесиста => Саймон израильтянин, Саймон не играет в тенис
Игрок в крикет занял 1 место
Кто является австалийцем? Саймон - израильтянин, Мйкл не амереканец, т.к. друга 3 => Ричард амереканец, а Майкл - австралиец
Майкл играет лучше амереканца, а игрок в крикет занял 1 место => амереканец Ричард не играет в крикет => в крикет играет Саймон=> Ричард увлекается тенисом
ответ: австралийцем является Майкл. Ричард увлекается тенисом
Формулы площадей квадрата S₁ и круга S₂ известны, что легко позволяет нам найти нужное условие.
Если нужно, чтобы случай, когда квадрат вписан в круг тоже учитывался, строгое неравенство следует заменить нестрогим.
// PascalABC.NET 3.0, сборка 1160 от 05.02.2016
begin
var s1:=ReadReal('Площадь квадрата');
var s2:=ReadReal('Площадь круга');
if pi*s1<2*s2 then Writeln('Квадрат умещается в круге')
else Writeln('Квадрат не умещается в круге')
end.
Тестовое решение:
Площадь квадрата 24.6
Площадь круга 28.4
Квадрат не умещается в круге