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

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » 其它 » Euler 工程 第十九题：每月第一天是周日的天数
51/1返回列表
查看: 1067  |  回复: 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的回帖

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的回帖
查看全部 5 个回答

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的回帖

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的回帖
查看全部 5 个回答
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 材料学硕318求调剂 +5 February_Feb 2026-03-19 5/250 2026-03-19 23:51 by 23Postgrad
[考研] 一志愿中国海洋大学，生物学，301分，求调剂 +5 1孙悟空 2026-03-17 6/300 2026-03-19 23:46 by zcl123
[考研] 0703化学调剂 +10 妮妮ninicgb 2026-03-15 14/700 2026-03-19 22:59 by 学员8dgXkO
[考研] 招收调剂硕士 +4 lidianxing 2026-03-19 10/500 2026-03-19 16:05 by 余麟余
[考研] 324分 085600材料化工求调剂 +3 llllkkkhh 2026-03-18 3/150 2026-03-19 14:22 by houyaoxu
[考研] 317求调剂 +3 申子申申 2026-03-19 6/300 2026-03-19 14:16 by 申子申申
[考研] 一志愿福大288有机化学，求调剂 +3 小木虫200408204 2026-03-18 3/150 2026-03-19 13:31 by houyaoxu
[考研] 一志愿中海洋材料工程专硕330分求调剂 +7 小材化本科 2026-03-18 7/350 2026-03-19 10:46 by Linda Hu
[考研] 274求调剂 +6 S.H1 2026-03-18 6/300 2026-03-19 09:34 by 花店相见
[考研] 生物学071000 329分求调剂 +3 我爱生物生物爱� 2026-03-17 3/150 2026-03-18 10:12 by macy2011
[考研] 268求调剂 +6 简单点0 2026-03-17 6/300 2026-03-18 09:04 by 无际的草原
[考研] 293求调剂 +11 zjl的号 2026-03-16 16/800 2026-03-18 08:10 by zhukairuo
[考研] 268求调剂 +8 一定有学上- 2026-03-14 9/450 2026-03-17 17:47 by laoshidan
[考研] 11408 一志愿西电，277分求调剂 +3 zhouzhen654 2026-03-16 3/150 2026-03-17 07:03 by laoshidan
[考研] 药学383 求调剂 +3 药学chy 2026-03-15 4/200 2026-03-16 20:51 by 元子^0^
[考研] 机械专硕325，寻找调剂院校 +3 y9999 2026-03-15 5/250 2026-03-16 19:58 by y9999
[考研] 326求调剂 +4 诺贝尔化学奖觊� 2026-03-15 7/350 2026-03-16 17:11 by 诺贝尔化学奖觊�
[考研] 070305求调剂 +3 mlpqaz03 2026-03-14 4/200 2026-03-15 11:04 by peike
[考研] 330求调剂 +3 ?酱给调剂跪了 2026-03-13 3/150 2026-03-14 10:13 by JourneyLucky
[考研] 290求调剂 +3 ADT 2026-03-13 3/150 2026-03-13 10:19 by peike
信息提示
关闭
请填处理意见
关闭