山东理工大学C语言实验

山东理工大学

C语言实验指导[答案]

实验一? 顺序结构程序设计(2学时)

//姓名：***

//班级：***

//学号：***

//参考测试数据：输入：0 0 180 输出：20015.08

// 输入：30 0 90 输出：8397.72

// 输入：60 0 45 输出：2453.20

#include

#include

#define PI 3.141592653//定义PI的值

void main()

{

double wd,ajd,bjd,jdc,r1,d1,d12,yxj,d;

double R=6371.0;//定义地球的半径

printf("已知地球的平均半径为6371千米,\n\n假设在地球的同一纬度上，有两个处于不同经度的城市A、B.\n\n编程序求出这两个城市之间的地面距离。\n\n");

printf("规定东经为正，西经为负，请对应输入符号。\n\n");//问题

ppp:

p1:

printf("请输入相同的纬度：");

scanf("%lf",&wd);

if(fabs(wd)>90.0)

{

printf("输入有误，请重新输入!\n");//输入错误将会重新输入

goto p1;

}

p2:printf("请输入A点经度：");

scanf("%lf",&ajd);

if(fabs(ajd)>180.0)

{

printf("输入有误，请重新输入!\n");

goto p2;

}

p3:printf("请输入B点经度：");

scanf("%lf",&bjd);

if(fabs(bjd)>180.0)

{

printf("输入有误，请重新输入!\n");

goto p3;

}

if(fabs(ajd-bjd)>180)

jdc=fabs(ajd-bjd)-180;

else

jdc=fabs(ajd-bjd);//计算经度差

r1=R*cos(wd*PI/180);//计算这一纬度的圆的半径

d12=2*r1*r1-2*r1*r1*cos(jdc*PI/180);

yxj=acos(1-d12/(2*R*R));//圆心角

d=R*yxj;//两地的距离

printf("A、B两点地面距离为：%lf千米。\n",d);//输出两地的距离

goto ppp;

}

//终于把这个公式推出来，完成了!

实验二 选择结构程序设计(2学时)

//姓名：***

//班级：***

//学号：***

#include

#include

void main()

{

int nian,yue,ri,tianshu,m;

printf("编程序实现：\n\n输入日期:年,月,日[注:公元1年1月1日为第一天]\n\n输出:从公元1年1月1日到这一天总共___天，并求出这一天是星期___。\n\n");

p1:

printf("请输入:____年__月__日.\n\n");//问题

scanf("%d%d%d",&nian,&yue,&ri);

if(nian<1)

{

printf("输入有误，请重新输入!\n");//输入错误将会重新输入

goto p1;

}

else

if(yue<1||yue>12)

{

printf("输入有误，请重新输入!\n");

goto p1;

}

else

if(yue==1||yue==3||yue==5||yue==7||yue==8||yue==10||yue==12)

{

if(ri<1||ri>31)

{

printf("输入有误，请重新输入!\n");

goto p1;}

}

else

if(yue==4||yue==6||yue==9||yue==11)

{

if(ri<1||ri>30)

{

printf("输入有误，请重新输入!\n");

goto p1;}

}

else

if(yue==2)

{

if(ri<1||ri>29)

{

printf("输入有误，请重新输入!\n");

goto p1;}

}//完成输入

m=(nian-nian%4)/4-(nian-nian%100)/100+(nian-nian%400)/400;//输入一个年数，计算闰年数!

printf("%d闰年\n\n",m);//便于验证!

tianshu=(nian-1)*365;//计算天数，到nian之前(不算闰年)