HelpF.pro

Функция переcечения отрезков

Код 1C v 7.x
 
Функция ПересечениеОтрезков(А1, А2, Б1, Б2)
Если А1<=Б1 Тогда
Х = Мин(Б2-Б1,А2-Б1);
Х = Макс(Х,0); // если Х<0, то вернем 0

Иначе
Х = Мин(А2-А1,Б2-А1);
Х = Макс(Х,0); // если Х<0, то вернем 0

КонецЕсли;
Возврат Х;
КонецФункции

Опубликовано на сайте: https://HelpF.pro
Прямая ссылка: https://HelpF.pro/faq7/view/200.html