helpf.pro
Регистрация
 0 
Распечатать

1С 7.x : Функция пере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

КонецЕсли;
Возврат Х;
КонецФункции
Разместил:   Версии: | 7.x |  Дата:   Прочитано: 5772
 0 
Распечатать
Возможно, вас также заинтересует
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.