网站导航网学 原创论文 原创专题 网站设计 最新系统 原创论文 论文降重 发表论文 论文发表 UI设计定制 论文答辩PPT格式排版 期刊发表 论文专题
返回网学首页
网学原创论文
最新论文 推荐专题 热门论文 论文专题
当前位置: 网学 > 交易代码 > 课程设计 > 正文

万年历课程设计

论文降重修改服务、格式排版等 获取论文 论文降重及排版 论文发表 相关服务
万年历课程设计|计算机数据库课程设计|精品课程网站设计|课程设计网报告总结心得
#includelong int f(int year,int month){/*f(年,月)=年-1,如果<3;否则,f(年,月)=年*/  if(month<3) return year-1;  else return year;}long int g(int month){/*g(月)=月+13;否则,g(月)=月+1*/  if(month<3) return month+13;  else return month+1;}long int n(int year,int month,int day){/*N=1461*f(年,月)/4+153*g(月)/5+日*/  return 1461L*f(year,month)/4+153L*g(month)/5+day;}int w(int year,int month,int day){/*w=(N-621049)%7(0<=w<7)*/  return(int)((n(year,month,day)%7-621049L%7+7)%7);}int date[12][6][7];int day_tbl[][12]={{31,28,31,30,31,30,31,31,30,31,30,31},{31,29,31,30,31,30,31,31,30,31,30,31}};void main(){int sw,leap,i,j,k,wd,day;int year;/*年*/char title[]="SUN MON TUE WED THU FRI SAT";printf("please input the year whose calendar you want to know: ");scanf("%d*c",&year);sw=w(year,1,1);leap=year%4==0&&year%100||year%400==0;for(i=0;i<12;i++)for(j=0;j<6;j++)for(k=0;k<7;k++)date[j][k]=0;for(i=0;i<12;i++)for(wd=0,day=1;day<=day_tbl[leap];day++){/*将第i+1月的日期填入日期列表*/date[wd][sw]=day;sw=++sw%7;if(sw==0) wd++;}printf("\n|======================the calendar of year &d=====================|\n|",year);for(i=0;i<6;i++){/*先测算第i+1月和第i+7月的最大星期数*/  for(wd=0,k=0;k<7;k++)   wd+=date[5][k]+date[i+6][5][k];wd=wd?6:5;printf("%2d  %s  %2d  %s |\n|",i+1,title,i+7,title);for(j=0;j
版权所有 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
Copyright 2008-2020 myeducs.Cn www.myeducs.Cn All Rights Reserved 湘ICP备09003080号 常年法律顾问:王律师