应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

Znn3bq.jpeg
小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » 其它 » Euler 工程 第十九题：每月第一天是周日的天数
51/1返回列表
查看: 1087  |  回复: 4
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
本帖产生 4 个 程序强帖 ，点击这里进行查看

holmescn

金虫 (正式写手)

[交流] Euler 工程 第十九题：每月第一天是周日的天数 已有3人参与

首先我们已经知:

  • 1900-1-1 是周一
  • 4、6、9、11月有30天，1、3、5、7、8、10、12有31天
  • 2月在闰年29天，非闰年28天
  • 能被400或4整除的年份是闰年


那么整个20世纪有多少个月的第一天是周日呢？（从1901-1-1到2000-12-31）
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2011-06-02 17:17:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

huycwork

金虫 (著名写手)
★ ★
小木虫(金币+0.5):给个红包，谢谢回帖
xzhdty(金币+1): 谢谢 2011-06-02 22:57:30
余泽成(程序强帖+1): 鼓励交流！ 2011-06-04 19:22:47
依照惯例，来个C++版本：
CODE:
#include

bool isLeapYear(int year){
        return ((year%4 == 0)&&(year%100 != 0))||(year%400 == 0);
}

size_t daysOfMouth(int year, int mouth){
        switch(mouth){
        case 4:case 6:case 9:case 11:
                return 30;
        case 1:case 3:case 5:case 7:case 8:case 10:case 12:
                return 31;
        case 2:
                return isLeapYear(year)?29:28;
        default:
                return 0;
        }
}

size_t eular19(size_t y1 = 1901, size_t y2 = 2001){
        size_t year = 1900;
        size_t day = 1;
        do{
                day += isLeapYear(year)?366:365;
                day %= 7;
                ++year;
        }while(year < y1);
        size_t sdays = 0;
        do{
                for(int i = 1; i <= 12; ++i){
                        day += daysOfMouth(year, i);
                        day %= 7;
                        if(day == 0)
                                ++sdays;
                }
                ++year;
        }while(year < y2);
        return sdays;
}

int main(){
        std::cout< }
赞一下(3人) 回复此楼
漩涡的中心有一块空地，空空的。
2楼2011-06-02 17:22:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

holmescn

金虫 (正式写手)
★
dubo(金币+1): 谢谢交流 2011-06-04 17:19:05
余泽成(程序强帖+1): 鼓励交流！ 2011-06-04 19:22:58
huycwork好快啊，我的python版刚写出来
CODE:
# -*- coding: utf-8 -*-

days = [0, 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31]

date = [1900, 1, 1]

cntSundays = 0

while date[0] < 2001:
    date[2] += 7
    if date[0] % 400 == 0 or date[0] % 4 == 0:
        days[2] = 29
    else:
        days[2] = 28

    if date[2] > days[date[1]]:
        date[2] -= days[date[1]]
        date[1] += 1

    if date[1] > 12:
        date[0] += 1
        date[1] = 1

    if 1901 <= date[0] <= 2000 and date[2] == 2:
        cntSundays += 1

print cntSundays
赞一下(2人) 回复此楼
3楼2011-06-02 17:37:40
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wangww2011

木虫 (著名写手)
★ ★
小木虫(金币+0.5):给个红包，谢谢回帖
dubo(金币+1): 谢谢交流 2011-06-04 17:19:13
余泽成(程序强帖+1): 鼓励交流！ 2011-06-04 19:23:09
c语言版本
CODE:
#include

static int month[2][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 isleap(int n){
  if((n%400==0)||(n%4==0&&n%100!=0))return 1;
  else return 0;
}

int euler19(){
  int year,leap_year,m;
  int result=0;
  long days=0;
  
  for(year=1900;year<2001;year++){
    leap_year=isleap(year);
    for(m=0;m<12;m++){
      if(year>1900&&days%7==1)result++;
      days+=month[leap_year][m];
    }
  }
  
  return result;
}


int main(void){

printf("%d\n",euler19());

return 0;
}
赞一下(3人) 回复此楼
4楼2011-06-03 13:36:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

libralibra

至尊木虫 (著名写手)

骠骑将军
★ ★ ★ ★ ★
小木虫(金币+0.5):给个红包，谢谢回帖
dubo(金币+1): 谢谢交流 2011-06-04 17:19:21
dubo(金币+3): MALAB 还有 datenum 啊？呵呵真好 2011-06-04 17:22:08
余泽成(程序强帖+1): 鼓励交流！ 2011-06-04 19:23:28
matlab
CODE:
function result = euler19()
tic;
result = 0;
dateStart = datenum(1901,1,1);
dateEnd = datenum(2000,12,31);
for i=dateStart:dateEnd
   if strcmpi(datestr(i,'dd'),'01') && strcmpi(datestr(i,'ddd'),'sun')
       result = result+1;
   end
end
toc;
end

赞一下(4人) 回复此楼
matlab/VB/python/c++/Java写程序请发QQ邮件:790404545@qq.com
5楼2011-06-03 16:20:41
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 holmescn 的主题更新
51/1返回列表
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿哈工大 085600 277 12材科基求调剂 5+3 chenny174 2026-04-10 17/850 2026-04-11 00:26 by 骑牛渡寒江
[考研] 广东省 085601 329分求调剂 +13 Eddieddd 2026-04-10 13/650 2026-04-10 23:27 by 314126402
[考研] 263能源动力专硕求调剂 +4 加大号饭盒袋 2026-04-10 4/200 2026-04-10 20:52 by gong120082
[考研] 273求调剂 +51 麦小叮当 2026-04-06 58/2900 2026-04-10 15:54 by jiajinhpu
[考研] 求调剂 +11 雪逢冬 2026-04-10 11/550 2026-04-10 14:38 by Abskk
[考研] 296求调剂 +12 汪！？！ 2026-04-08 13/650 2026-04-10 12:09 by 汪！？！
[考研] 301求调剂 +4 XYPLR 2026-04-05 6/300 2026-04-10 09:17 by Delta2012
[考研] 308求调剂 +21 倘若起风了呢 2026-04-05 21/1050 2026-04-10 08:13 by Sammy2
[考研] 297求调剂 +27 GENJIOW 2026-04-07 30/1500 2026-04-09 23:20 by wolf97
[考研] 考研调剂 +13 冰冰，，， 2026-04-07 13/650 2026-04-09 17:01 by Lilly_Li
[考研] 085501机械专硕 302分 不挑专业求调剂 +5 汪某. 2026-04-09 5/250 2026-04-09 15:38 by 蒋皓禹
[硕博家园] 新一代电子信息294求调剂 不挑学校 +5 Ytyt11 2026-04-09 6/300 2026-04-09 14:40 by Ytyt11
[考研] 22408 一志愿双一流人工智能300分 四六级，数据分析国奖 +4 zzfeng123 2026-04-06 6/300 2026-04-07 21:02 by zzfeng123
[考研] 材料调剂 +11 一样YWY 2026-04-07 11/550 2026-04-07 15:13 by shdgaomin
[考研] 071000生物学调剂 +7 拉提桃 2026-04-06 7/350 2026-04-06 18:55 by 52305043001
[考研] 材料调剂 +5 小刘同学吖吖 2026-04-06 5/250 2026-04-06 18:34 by sherry_1901
[考研] 一志愿南航，数一英一学硕317求调剂！！ +6 Acaciad 2026-04-04 6/300 2026-04-06 12:13 by 考研学校招点人
[考研] 考研调剂 +5 美丽的youth_ 2026-04-04 6/300 2026-04-06 06:57 by houyaoxu
[考研] 290求调剂 +7 luoziheng 2026-04-04 7/350 2026-04-04 23:17 by lqwchd
[考研] 278求调剂 +14 范婷娜 2026-04-04 15/750 2026-04-04 22:15 by lqwchd
信息提示
关闭
请填处理意见
关闭