>>404
A,B,C をベクトルとすると
K＝( A (C−B)^T (A−B)＋B (A−C)^T (A−B) )/|A−B|^2
のように書けるから計算しな