Егор urbanknight

Есть функция в excel, рассчитывающая расстояние между точками выраженными координатами на шаре. Необходимо написать функцию, которая при получении координат делала-бы тоже самое. Функция excel =ATAN2(SIN(ПИ()*D2/180)*SIN(ПИ()*D3/180)+COS(ПИ()*D2/180)*COS(ПИ()*D3/180)*COS(ABS(ПИ()*D5/180-ПИ()*D4/180));КОРЕНЬ((COS(ПИ()*D3/180)*SIN(ПИ()*D5/180-ПИ()*D4/180))^2+(COS(ПИ()*D2/180)*SIN(ПИ()*D3/180)-SIN(ПИ()*D2/180)*COS(ПИ()*D3/180)*COS(ABS(ПИ()*D5/180-ПИ()*D4/180)))^2))*$G$2 ,где D2-x1 D3-x2 D4-y1 D5-y2 $G$2 - радиус сферы (6372795 метров) Для удобства, прикладываю excel файл Оплата webmoney