C语言例程：编制万年历

---

编制万年历

实例说明

编制输入年份，则输出该年年历的程序，通过程序学习和掌握三维数组的用法。

实例解析

利用自定义的函数 f()和 g()求出该年一月一日的星期，由闰年的判定条件，确定该年是否是
闰年。为了便于按星期输出各月的月历，引入三维数组的日期表 int date[12][6][7]。其中，12 表
示 12 个月；6 表示一个月最多有 6 个星期；7 表示每星期 7 天。程序首先将日期表置 0，然后顺
序将各月的日期填写到日期表中，各月的天数按月取自数组 day_tb1[][]。该数组是二维数组，第
一行存储平年的各月的天数，第二行存储闰年的各月的天数。程序的输出格式分两栏，左面一栏
是 1~6 月的月历，右面一栏是 7~12 月的月历。输出时，若日期数为 0，就用 4 个空白符代替，
否则输出日期。

程序代码

#include <stdio.h>
// system("cls");/* 清屏 */
void clrscr(){
    system("cls");/* 清屏 */
}

/* 输入年份，输出该年的年历 */
#include "stdio.h"
long 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，如月<3;否则，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}};

int 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[i][j][k]=0;/*日期表置 0*/
    for(i=0;i<12;i++)/*一年 12 个月*/
        for(wd=0,day=1;day<=day_tbl[leap][i];day++)
        {/*将第 i＋1 月的日期填入日期表*/
            date[i][wd][sw]=day;
            sw=++sw%7;/*每星期 7 天，以 0~6 计数*/
            if(sw==0) wd++;/*日期表每 7 天一行，星期天开始新的一行*/
        }
    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++)/*日期表的第 6 行有日期，则 wd!=0*/
            wd+=date[i][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<wd;j++)
        {
            printf(" ");/*输出 3 个空白符*/
            /*左栏为第 i+1 月，右栏为第 i+7 月*/
            for(k=0;k<7;k++)
                if(date[i][j][k])
                    printf("%4d",date[i][j][k]);
                else printf(" ");
                    printf(" ");/*输出 6 个空白符*/
            for(k=0;k<7;k++)
                if(date[i+6][j][k])
                    printf("%4d",date[i+6][j][k]);
                else printf(" ");
                    printf(" |\n|");
        }
    }
    puts("=================================================================|");
    puts("\n Press any key to quit...");
    getch();
    return 0;
}

程序运行结果