Считая элементы (x, y) координатами конечных точек отрезков ломаной линии, определить номер отрезка, который пересекает ось ординат, а также координаты точки пересечения. Если таких отрезков несколько, то указать номер наиболее длинного из них.
L := Sqrt(Sqr(X2 - X1) + Sqr(Y2 - Y1));Условие на пересечение с осью ординат такое, например:
if ((X1 <= 0) and (X2 >= 0)) or ((X1 >= 0) and (X2 <= 0)) then beginА точку пересечения можно найти вот так:
// . . .
end;
Y0 := Y1 - X1 * (Y2 - Y1) / (X2 - X1);А ещё отрезок может целиком лежать на оси ординат (X1 = X2 = 0). Видимо, в таком случае нужно вывести специальное сообщение об этом.