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

24小时热门版块排行榜    

Znn3bq.jpeg
小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » 其它 » Euler 工程 第十九题：每月第一天是周日的天数
51/1返回列表
查看: 1089  |  回复: 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返回列表
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 材料与化工调剂 +12 否极泰来2026 2026-04-10 13/650 2026-04-11 00:28 by wangjihu
[考研] 中药学调剂 初试324 +3 洋甘菊、 2026-04-10 5/250 2026-04-10 23:59 by 洋甘菊、
[考研] 281求调剂 +9 觉得好的吧 2026-04-10 9/450 2026-04-10 22:16 by 猪会飞
[考研] 一志愿东北大学控制工程085406数二英二385，求调剂 +6 Ezra_Zhang 2026-04-09 6/300 2026-04-10 16:23 by 高维春
[考研] 一志愿华东师范生物学326分，求调剂 +8 刘墨墨 2026-04-09 8/400 2026-04-10 12:00 by pengliang8036
[考研] 机械还有还有名额吗？太难了 +6 笑笑袁 2026-04-10 6/300 2026-04-10 11:54 by 高维春
[考研] 308求调剂 +21 倘若起风了呢 2026-04-05 21/1050 2026-04-10 08:13 by Sammy2
[考研] 化学工程与技术专业一志愿哈工程 291分B区 国家级大创负责人 有一作论文 +13 Emmy~ 2026-04-09 13/650 2026-04-09 14:47 by only周
[考研] 086000生物与医药调剂 +7 awwwwwooooo 2026-04-09 7/350 2026-04-09 13:31 by 北极159263
[考研] 考研求调剂 +4 雯??? 2026-04-08 4/200 2026-04-08 21:44 by 土木硕士招生
[考研] 298求调剂 +4 manman511 2026-04-05 4/200 2026-04-08 16:50 by tjzhao
[考研] 264求调剂 +11 麦小叮当 2026-04-07 11/550 2026-04-08 16:05 by 一只好果子?
[考研] 281求调剂 +10 椰子蘑菇 2026-04-06 10/500 2026-04-08 11:43 by zzucheup
[考研] 求调剂 +11 wwwwabcde 2026-04-07 11/550 2026-04-07 23:16 by JourneyLucky
[考研] 081700学硕，323分，一志愿中国海洋大学求调剂学校 +19 披星河 2026-04-04 19/950 2026-04-07 15:00 by 上岸快快
[考研] 372分材料与化工（085600）英二数二求调剂 +4 蓝笺片 2026-04-06 4/200 2026-04-07 12:30 by dongzh2009
[考研] 286求调剂 +20 Faune 2026-04-06 20/1000 2026-04-07 11:33 by 诗与自由
[考研] 307求调剂 +3 Youth@@ 2026-04-07 3/150 2026-04-07 09:25 by 小黑不怕难
[考研] 358求调剂 +7 秋gk 2026-04-04 7/350 2026-04-05 13:29 by huangmoli
[考研] 278求调剂 +14 范婷娜 2026-04-04 15/750 2026-04-04 22:15 by lqwchd
信息提示
关闭
请填处理意见
关闭