久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

標題: c語言日歷程序設計（可查詢任意年的任意月） [打印本頁]

作者: benbens 時間: 2015-7-15 02:24
標題: c語言日歷程序設計（可查詢任意年的任意月）
#include <stdio.h>
#include <conio.h>
#include <stdlib.h>

int Year=2012;
int Month=4;
int MonthDays[] = {31 , 28 , 31 , 30 , 31 , 30 , 31 , 31 , 30 , 31 , 30 , 31};
char IsLeapYear(int Year)
{
if((Year % 4 == 0 && Year % 100 != 0) || Year % 400 == 0)
{
      return 1 ;
}
else
{
      return 0 ;
}
}
int GetFirstDay(int year,int month,int day)
{
int week=0;
int c=0,y=0;
if (month==1)
{
  year--;
  month=13;
}
if (month==2)
{
  year--;
  month=14;
}
c=year/100;
y=year%100;
week=(c/4)-2*c+y+(y/4)+(26*(month+1)/10)+day-1;
week%=7;
if (week<0)
{
  week+=7;
}
return week;
}
void DisMonthDays(int year,int month)
{
int i;
int tmp=0;
int week=0;
printf("    %d 年 %d 月\n",year,month);
printf("日  一  二  三  四  五  六\n");
tmp=MonthDays[month-1];
if (month==2)
{
  if (IsLeapYear(year))
  {
tmp=MonthDays[month-1]+1;
  }
  else
tmp=MonthDays[month-1];
}
week=GetFirstDay(year,month,1);
for(i=0;i<week;i++)
{
  printf(" ");
}
for(i=1;i<=tmp;i++)
{
  printf("%2d  ",i);
  if (week>=6)
  {
week=0;
printf("\n");
  }
  else
week++;
}
}
void GetKey()
{
int key;
key = getche();
if(key==224)
{
  key = getche();
  if (key==72)
  {
Month++;
if (Month>12)
{
Month=1;
Year++;
}
  }
  else
if (key==80)
{
Month--;
if (Month<1)
{
   Month=12;
   Year--;
}
}
}
}
void main(void)
{
while (1)
{
  DisMonthDays(Year,Month);
  GetKey();
  printf("\n");
  system("cls");
}
}

作者: lyMarvin 時間: 2018-4-5 07:01
老師您好，能分享一下完整的程序嗎
謝謝

作者: mxjmjl 時間: 2018-5-3 15:26
樓上的這個已經是完整的代碼了

可編譯的,我上圖編譯成功了.

日歷2.PNG (41.34 KB, 下載次數: 214)

日歷.PNG (16.44 KB, 下載次數: 207)

作者: a89588038 時間: 2019-3-8 14:21

謝謝!51黑有你更精彩!

作者: guizi327832749 時間: 2023-3-5 23:22
樓主這個十分有趣，不知道對于閏年和400年這個也是好評

作者: tieq1952 時間: 2023-8-29 09:05
DEV C++運行該程序出錯：[Error]“：：main”必須返回“int”。
原程序：void main(void)
{
  while (1)
  {
DisMonthDays(Year,Month);
GetKey();
printf("\n");
system("cls");
  }
}

作者: sunotea 時間: 2024-5-9 21:11
牛，當教材學習了

歡迎光臨 (http://m.zg4o1577.cn/bbs/)