C问题.临表涕零.
这是一个在VC可运行的程序.#include <stdio.h>
int rn(int nianfen)/*判断某年是否是闰年*/
{
if( ((nianfen % 4 == 0) && (nianfen % 100 != 0)) || (nianfen % 400 == 0))
return 1;
else
return 0;
}
int yf(int yuefen, int runnian)/*获得当月天数*/
{
int dyts;
switch(yuefen)
{
case 1: dyts=31;break;
case 2: dyts=28 + runnian;break;
case 3: dyts=31;break;
case 4: dyts=30;break;
case 5: dyts=31;break;
case 6: dyts=30;break;
case 7: dyts=31;break;
case 8: dyts=31;break;
case 9: dyts=30;break;
case 10: dyts=31;break;
case 11: dyts=30;break;
case 12: dyts=31;break;
}
return dyts;
}
int yuandan(int nian)/*元旦是星期几*/
{
return (nian-1+(nian-1)/4-(nian-1)/100+(nian-1)/400 + 1) % 7;
}
void prin(int yuefen,int nian)/*输入月份表*/
{
int i,dyts,xqdw,sun=0,x=0;
dyts = yf(yuefen,rn(nian));/*获得当月天数*/
printf("\n\t\t\t%d年%d月\n",nian,yuefen);
printf("星期日\t星期一\t星期二\t星期三\t星期四\t星期五\t星期六\n");
for(i=1; i<yuefen; i++)/*计算这个月的第一天是星期几*/
{
sun += yf(i,rn(nian));
}
xqdw = (sun+yuandan(nian)) % 7;
for(i=0; i<xqdw; i++)/*把当月1日的前几天空过去*/
{
printf("\t");
x++;
}
for(i=1; i<=dyts; i++)/*输入月份表*/
{
printf("%d",i);
x++;
if(x == 7)
{
printf("\n");
x=0;
}
else
{
printf("\t");
}
}
printf("\n");
}
void gn1()/*第一功能项*/
{
int nian,yue,ri,ri2=0,xq,x=1,i;
char pd;
printf("请输入年月日(格式:xxxx,xx,xx):");
scanf("%d,%d,%d",&nian,&yue,&ri);
for(i=1; i<yue; i++)
{
ri2 += yf(i,rn(nian));
}
ri2 += ri;/*日期是当年的那一天*/
xq = (nian-1+(nian-1)/4-(nian-1)/100+(nian-1)/400+ri2) % 7;/*计算星期*/
do
{
if(xq == 0)
printf("%d年%d月%d日是星期日,是否继续查询(Y/N)\n",nian,yue,ri);
else
printf("%d年%d月%d日是星期%d,是否继续查询(Y/N)\n",nian,yue,ri,xq);
scanf("%c",&pd);
scanf("%c",&pd);
if(pd == 'y' || pd == 'Y')
{
x = 1;
gn1();
}
else
{
if(pd == 'n' || pd == 'N')
{
x = 1;
}
else
{
x = 0;
printf("选择错误请重新输入:\n");
}
}
}
while(x != 1);
}
void gn2()/*第二功能项*/
{
int nian,x=1;
char pd;
printf("请输入要查哪一年? (格式:xxxx):");
scanf("%d",&nian);
do
{
if(rn(nian) == 1)
printf("%d年是闰年,是否继续查询(Y/N)?",nian);
if(rn(nian) == 0)
printf("%d年是平年,是否继续查询(Y/N)?",nian);
scanf("%c",&pd);
scanf("%c",&pd);
if(pd == 'y' || pd == 'Y')
{
x = 1;
gn2();
}
else
{
if(pd == 'n' || pd == 'N')
{
x = 1;
}
else
{
x = 0;
printf("选择错误请重新输入:\n");
}
}
}
while(x != 1);
}
void gn3()/*第三功能项*/
{
int nian,x=1,i;
char pd;
printf("请输入要打印的年份(格式:xxxx):");
scanf("%d",&nian);
do
{
if(x == 1)/*正常输出*/
{
printf("\n\n");
for(i=1; i<=12; i++)/*输出月份表*/
{
prin(i,nian);
}
}
printf("是否继续打印(Y/N)?");
scanf("%c",&pd);
scanf("%c",&pd);
if(pd == 'y' || pd == 'Y')
{
x = 1;
gn3();
}
else
{
if(pd == 'n' || pd == 'N')
{
x = 1;
}
else
{
x = 0;
printf("选择错误请重新输入:\n");
}
}
}
while(x != 1);
}
void gn4()/*第四功能项*/
{
int y,m,d,i;
int days,m2;
int day=0;
int num[12];
printf("请输入今天的日期:(年-月-日) ");
scanf("%d-%d-%d",&y,&m,&d);
if((y%4==0&&y%100!=0)||y%400==0)
{
m2=29;
}
else
{
m2=28;
}
if(m==1||m==3||m==5||m==7||m==8||m==10||m==12)
{
days=31;
}
if(m==4||m==6||m==9||m==11)
{
days=30;
}
if(m==2)
{
days=m2;
}
num[0]=31;
num[1]=m2;
num[2]=31;
num[3]=30;
num[4]=31;
num[5]=30;
num[6]=31;
num[7]=31;
num[8]=30;
num[9]=31;
num[10]=30;
num[11]=31;
if(d<=days)
{
for(i=0;i<=m-1;i++)
{
day+=num[i];
}
day+=d;
printf("\n今天是%d年的第%d天\n",y,day);
}
else
{
printf("\n输入日期无效!\n");
}
}
int caidan()/*菜单项*/
{
int x;
printf("万年历功能菜单\n1． 查询某年某月某日是星期几\n2． 查询某年是否是闰年\n3． 打印某年的全年日历\n4． 计算输入日期是今年第几天\n5． 退出\n");
printf("请输入您的选择:");
scanf("%d",&x);
switch(x)
{
case 1:gn1();return 0;
case 2:gn2();return 0;
case 3:gn3();return 0;
case 4:gn4();return 0;
case 5:return -1;
default:printf("输入错误请重新输入!\n");return 0;
}
}
void main()
{
int pd=0;
do
{
printf("\n\n");
if(pd == 0)
{
pd = caidan();
}
}
while(pd != -1);
printf("程序成功退出!\n");
}
这也是一个可运行的程序.
#include <stdio.h> #include <string.h>
/****** 1900 - 2049 阴历数据 ****** 数据格式说明
5位十六进制数字 例:04bd8
1位:闰月是否为大月(30天) 0:不是 1:是 2、3、4位:转换二进制为:0100 1011 1101 12个月的大小月 0:小月 1:大月 5位:闰月的月份 此为8月 *******************************************************************************/
int lunar_info[]={
0x04bd8,0x04ae0,0x0a570,
0x054d5,0x0d260,0x0d950,
0x16554,0x056a0,0x09ad0,
0x055d2,0x04ae0,0x0a5b6,
0x0a4d0,0x0d250,0x1d255,
0x0b540,0x0d6a0,0x0ada2,
0x095b0,0x14977,0x04970,
0x0a4b0,0x0b4b5,0x06a50,
0x06d40,0x1ab54,0x02b60,
0x09570,0x052f2,0x04970,
0x06566,0x0d4a0,0x0ea50,
0x06e95,0x05ad0,0x02b60,
0x186e3,0x092e0,0x1c8d7,
0x0c950,0x0d4a0,0x1d8a6,
0x0b550,0x056a0,0x1a5b4,
0x025d0,0x092d0,0x0d2b2,
0x0a950,0x0b557,0x06ca0,
0x0b550,0x15355,0x04da0,
0x0a5d0,0x14573,0x052d0,
0x0a9a8,0x0e950,0x06aa0,
0x0aea6,0x0ab50,0x04b60,
0x0aae4,0x0a570,0x05260,
0x0f263,0x0d950,0x05b57,
0x056a0,0x096d0,0x04dd5,
0x04ad0,0x0a4d0,0x0d4d4,
0x0d250,0x0d558,0x0b540,
0x0b5a0,0x195a6,0x095b0,
0x049b0,0x0a974,0x0a4b0,
0x0b27a,0x06a50,0x06d40,
0x0af46,0x0ab60,0x09570,
0x04af5,0x04970,0x064b0,
0x074a3,0x0ea50,0x06b58,
0x055c0,0x0ab60,0x096d5,
0x092e0,0x0c960,0x0d954,
0x0d4a0,0x0da50,0x07552,
0x056a0,0x0abb7,0x025d0,
0x092d0,0x0cab5,0x0a950,
0x0b4a0,0x0baa4,0x0ad50,
0x055d9,0x04ba0,0x0a5b0,
0x15176,0x052b0,0x0a930,
0x07954,0x06aa0,0x0ad50,
0x05b52,0x04b60,0x0a6e6,
0x0a4e0,0x0d260,0x0ea65,
0x0d530,0x05aa0,0x076a3,
0x096d0,0x04bd7,0x04ad0,
0x0a4d0,0x1d0b6,0x0d250,
0x0d520,0x0dd45,0x0b5a0,
0x056d0,0x055b2,0x049b0,
0x0a577,0x0a4b0,0x0aa50,
0x1b255,0x06d20,0x0ada0
};
char Gan[10][3] = {"甲","乙","丙","丁","戊","己","庚","辛","壬","癸"};
char Zhi[12][3] = {"子","丑","寅","卯","辰","巳","午","未","申","酉","戌","亥"};
char Shu[12][3] = {"鼠","牛","虎","兔","龙","蛇","马","羊","猴","鸡","狗","猪"};
char solar_term[24][5] =
{
"小寒","大寒","立春","雨水","惊蛰","春分",
"清明","谷雨","立夏","小满","芒种","夏至",
"小暑","大暑","立秋","处暑","白露","秋分",
"寒露","霜降","立冬","小雪","大雪","冬至"
}; char chinese_num[30][5] =
{
"初一","初二","初三","初四","初五","初六","初七","初八",
"初九","初十","十一","十二","十三","十四","十五","十六",
"十七","十八","十九","廿十","廿一","廿二", "廿三",
"廿四","廿五","廿六","廿七","廿八", "廿九","卅"
};
char chinese_month[12][5] =
{
"一","二","三","四","五","六",
"七","八","九","十", "十一","十二"
};
typedef struct
{
int lunar_year; /* 年 */
int lunar_month; /* 月 */
int lunar_day; /* 日 */
int lunar_mday; /* 本月天数 */
int leap_month; /* 本年闰月 */
int leap_state; /* 本月是否为闰月 0:非闰月 1:闰月*/ } Lunar_info;
typedef struct
{
int chinese_era_year;
int chinese_era_month;
int chinese_era_day;
} Chinese_era;
main()
{
int s_year;
int s_month;
int s_day;
int week;
int l_year;
int l_month;
int l_day;
int s_month_total_day;
int l_month_total_day;
int l_year_total_day;
int l_leap_month;
int l_leap_month_day;
int space_num;
int c_num; int i,j;
char tmp_str[9]; Chinese_era c_ear; Lunar_info l_info;
printf("*******************************日历1900-2100 **********************************\n\n");
while (1) { printf("\n请输入年:");
memset(tmp_str, 0, sizeof(tmp_str));
gets(tmp_str); s_year = atoi(tmp_str);
if ((s_year < 1900) || (s_year > 2100))
{
printf("年份输入错误 !!!\n"); continue;
}
printf("请输入月:");
memset(tmp_str, 0, sizeof(tmp_str)); gets(tmp_str); s_month = atoi(tmp_str);
if ((s_month < 1) || (s_month > 12))
{ printf("月份输入错误 !!!\n"); continue; }
week = get_solar_week(s_year, s_month);s_month_total_day = get_solar_month_total_day(s_year, s_month);
memset(&c_ear, 0, sizeof(c_ear)); memset(&l_info, 0, sizeof(l_info));
get_lunar_info(s_year, s_month, &l_info, &c_ear);
memset(tmp_str, 0, sizeof(tmp_str)); get_chinese_era(s_year - 1864, tmp_str);
printf(" 阳历:%d年%02d月 阴历:%s年 【%s】\n", s_year, s_month, tmp_str, Shu[(s_year - 1864) % 12]);
printf("------------------------------------------------------\n");
printf("星期日 星期一 星期二 星期三 星期四 星期五 星期六\n");
printf(" ");
space_num = week;
for (i = 1; i < space_num; i++) { printf(" "); }
c_num = 0;
for (i = 1; i <= s_month_total_day; i++)
{ s_day = i; printf(" %02d ", s_day);
week += 1;
if ((week > 7) || (i == s_month_total_day))
{ week = 1; printf("\n");
if (i < 7) { for (j = 1; j < space_num; j++)
{ printf(" "); }
week = space_num; }
else week = 1;
while(1) { week += 1;
memset(tmp_str, 0, sizeof(tmp_str)); out_chinese(&l_info, &tmp_str);
printf("% 6s", tmp_str);
if (l_info.lunar_day < l_info.lunar_mday) l_info.lunar_day = l_info.lunar_day + 1;
else { if ((l_info.lunar_month == l_info.leap_month) && l_info.leap_state == 0) { l_info.lunar_mday=get_leap_month_day(l_info.lunar_year); l_info.leap_state = 1; }
else { l_info.lunar_month = l_info.lunar_month + 1;
if (l_info.lunar_month > 12) { l_info.lunar_month = 1;
l_info.lunar_year = l_info.lunar_year + 1; }
l_info.lunar_mday = get_lunar_month_total_day(l_info.lunar_year, l_info.lunar_month);
l_info.leap_state = 0; } l_info.lunar_day = 1; }
c_num ++;
if ((week > 7) || (c_num == s_month_total_day)) { week = 1; printf("\n "); break; } else printf(" "); } } else printf(" "); }
printf("\n------------------------------------------------------\n"); }
}
/*** 确定1900年01月01日到M年M月的天数 ***/ int get_solar_total_day(int solar_year, int solar_month) { int total_day; int temp_num;
total_day = 0;
for (temp_num = 1900; temp_num < solar_year; temp_num++)
{ if ((((temp_num % 4) == 0) && ((temp_num % 100) != 0)) || (temp_num % 400 == 0)) { total_day += 366; } else { total_day += 365; } }
for(temp_num = 1;temp_num < solar_month; temp_num++)
{ switch(temp_num)
{
case 1:
case 3:
case 5:
case 7:
case 8:
case 10:
case 12:
total_day += 31;
break; case 2:
if ((((solar_year % 4) == 0) && ((solar_year % 100) != 0)) || (solar_year % 400 == 0))
{ total_day += 29; }
else { total_day += 28; }
break;
case 4:
case 6:
case 9:
case 11:
total_day += 30;
break; }
}
return total_day; }
/*** 确定当月1日为星期几 以1900.01.01为基准 1为星期日 ***/
int get_solar_week(int solar_year, int solar_month)
{
int week; int total_day;
week = 2; /* 1900.01.01 为星期一 */
total_day = get_solar_total_day(solar_year, solar_month);
total_day %= 7; week = week + total_day; week %= 7;
if (week == 0) week = 7;
return week;
}
/*** 确定阳历当月天数 ***/
int get_solar_month_total_day(int solar_year, int solar_month)
{
int solar_month_total_day;
switch(solar_month)
{
case 1:
case 3:
case 5:
case 7:
case 8:
case 10:
case 12:
solar_month_total_day = 31;
break;
case 2:
if ((((solar_year % 4) == 0) && ((solar_year % 100) != 0)) || (solar_year % 400 == 0))
{ solar_month_total_day = 29; }
else { solar_month_total_day = 28; }
break;
case 4:
case 6:
case 9:
case 11:
solar_month_total_day = 30;
break;
}
return solar_month_total_day;
}
/*** 确定闰月 ***/
int get_leap_month(int lunar_year)
{ return lunar_info[lunar_year - 1900] & 0xf; }
/*** 确定闰月天数 ***/
int get_leap_month_day(int lunar_year)
{ if (get_leap_month(lunar_year))
return ((lunar_info[lunar_year - 1900] & 0x10000)? 30:29);
else return(0); }
/*** 确定阴历当月天数 ***/
int get_lunar_month_total_day(int lunar_year, int lunar_month)
{ return ((lunar_info[lunar_year - 1900] & (0x10000 >> lunar_month))? 30:29); }
/*** 阴历当年总天数 ***/
int get_lunar_year_total_day(int lunar_year)
{ int sum = 348; /* 348 = 29*12 */
int i;
for(i = 0x8000; i > 0x8; i = (i>>1)) sum += (lunar_info[lunar_year - 1900] & i)? 1:0;
return(sum + get_leap_month_day(lunar_year)); }
/*** 确定天干地支 ***/
int get_chinese_era(int num, char *str)
{ strcpy(str, Gan[num % 10]); strcat(str, Zhi[num % 12]); }
int get_lunar_info(int solar_year, int solar_month, Lunar_info *l_info, Chinese_era *chinese_ear) { int i; int total_day; int temp_num; char str[200];
/* 阳历1900年01月31日为 阴历1900年01月01日 */
total_day = get_solar_total_day(solar_year, solar_month) - 30;
chinese_ear->chinese_era_day = total_day + 40;
chinese_ear->chinese_era_month = 14;
for(i = 1900; i < 2050 && total_day > 0; i++) { temp_num = get_lunar_year_total_day(i); total_day -= temp_num; chinese_ear->chinese_era_month += 12; }
l_info->lunar_year = i;
if(total_day < 0) { total_day += temp_num; l_info->lunar_year--; chinese_ear->chinese_era_month -= 12; }
chinese_ear->chinese_era_year = l_info->lunar_year - 1864;
l_info->leap_month = get_leap_month(l_info->lunar_year);
l_info->leap_state = 0;
for(i = 1; i < 13 && total_day > 0; i++) { if (l_info->leap_month > 0 && i == (l_info->leap_month + 1) && l_info->leap_state == 0) { --i; temp_num = get_leap_month_day(l_info->lunar_year); l_info->leap_state = 1; } else { temp_num = get_lunar_month_total_day(l_info->lunar_year, i); }
if (l_info->leap_state==1 && i == (l_info->leap_month + 1)) l_info->leap_state = 0;
total_day -= temp_num;
if (l_info->leap_state == 0) chinese_ear->chinese_era_month ++; }
if(total_day == 0 && l_info->leap_month>0 && i==l_info->leap_month+1) if(l_info->leap_state == 1) { l_info->leap_state = 0; } else { l_info->leap_state = 1; --i; --chinese_ear->chinese_era_month; }
if(total_day < 0) { total_day += temp_num; --i; --chinese_ear->chinese_era_month; }
l_info->lunar_month = i; l_info->lunar_day = total_day + 1;
if (l_info->leap_state == 0) { l_info->lunar_mday = get_lunar_month_total_day(l_info->lunar_year, l_info->lunar_month); } else l_info->lunar_mday = get_leap_month_day(l_info->lunar_year);
return 0; }
int out_chinese(Lunar_info *l_info, char *chinese_str)
{
if (l_info->lunar_day != 1) strcpy(chinese_str, chinese_num[l_info->lunar_day - 1]);
else { if (l_info->leap_state == 1) { strcpy(chinese_str, "闰"); strcat(chinese_str, chinese_month[l_info->lunar_month - 1]);
strcat(chinese_str, "月"); }
else { strcpy(chinese_str, chinese_month[l_info->lunar_month - 1]);
strcat(chinese_str, "月"); } }
return 0; }
小弟想将第二个程序嵌入到第一个程序中.成为菜单选项中一个选项的功能.该怎么做???
