⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 2742783_ac_0ms_120k.c

📁 北大大牛代码 1240道题的原代码 超级权威
💻 C
字号:
#include <stdio.h>
#include <math.h>
#define r 6370.0
#define PI 4*atan(1)

int main()
{
	int a, b, c, d;
	double a1, b1, c1, d1, D;
	char s1[2], s2[2];

	scanf("%d%d%s%d%d%s",&a,&b,s1,&c,&d,s2);
	a1 = a+b*1.0/60;
	a1 = a1*PI/180;
	if (s1[0]=='S')
		a1 *= -1;
	b1 = c+d*1.0/60;
	b1 = b1*PI/180;
	if (s2[0]=='W')
		b1 *= -1;
	scanf("%d%d%s%d%d%s",&a,&b,s1,&c,&d,s2);
	c1 = a+b*1.0/60;
	c1 = c1*PI/180;
	if (s1[0]=='S')
		c1 *= -1;
	d1 = c+d*1.0/60;
	d1 = d1*PI/180;
	if (s2[0]=='W')
		d1 *= -1;
	D = acos(sin(a1)*sin(c1)+(cos(a1)*cos(c1)*cos(fabs(b1-d1))))*r;
	printf("%.3lf\n",D);
	return 0;
}

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -