Я нашел его!!! Интеграааал
Код:
double e, e2, d2, ed, e_d;
Vec2 E = P - A;
Vec2 D = B - A;
e2 = Len2(E);
d2 = Len2(D);
ed = Dot(E, D);
e = sqrt(e2);
e_d = Len(P - B); // == Len(E - D)
Vec2 V(ed - d2 - e_d*ed/e, ed - e2 + e*e_d);
Vec2 R(E.x * V.x + D.x * V.y, E.y * V.x + D.y * V.y);
R /= ( e_d * (ed*ed - e2*d2) );
return q * R;
Len(вектор2д) - длина вектора.
Len2(вектор2д) - длина вектора в квадрате.
Dot(вектор2д, вектор2д) - скалярное произведение векторов.
Vec2 - это и есть "вектор2д" с компанентами X и Y.
Теперь попытаюсь выразить его в виде формулы:
но что-то уже поздно...
Всем спасибо за внимание
Александр, спасибо за помощь с интегралом
P.S. Maple - это хорошая весчъ! Без него я бы не нашел интеграл.
P.P.S. Это кусок кода из моей
программки 