根据经纬度计算里程

最新推荐文章于 2024-05-21 16:22:59 发布

zanbilei

最新推荐文章于 2024-05-21 16:22:59 发布

阅读量2.1k

点赞数 2

分类专栏： VC++ VB 文章标签： distance

本文链接：https://blog.csdn.net/zanbilei/article/details/2543077

版权

VC++ 同时被 2 个专栏收录

1 篇文章 0 订阅

订阅专栏

1 篇文章 0 订阅

订阅专栏

代码一

private const double EARTH_RADIUS=6378.137; private static double rad(double d) { return d*Math.PI/180.0; } public static double GetDistance(double lat1,double lng1,double lat2,double lng2) { double radLat1=rad(lat1); double radLat2=rad(lat2); double a=radLat1-radLat2; double b=rad(lng1)-rad(lng2); double s=2*Math.Asin(Math.Pow(Math.Sin(a/2),2)+Math.Cos(radLat1)*Math.Cos(radLat2)+Math.Pow(Math.Sin

(b/2),2))); s=s*EARTH_RADIUS; s=Math.Round(s*10000)/10000; return s; }

代码二

double hypot(double x, double y) { return sqrt(x * x + y * y); }

double distance(double wd1, double jd1, double wd2, double jd2) {// 根据经纬度坐标计算实际距离 double x, y, out; double PI = 3.1415926535898; double R = 6.371229 * 1e6; x = (jd2 - jd1) * PI * R * cos( ( (wd1 + wd2) / 2) * PI / 180) / 180; y = (wd2 - wd1) * PI * R / 180; out = hypot(x, y); return out; }