mzp https://blog.hatena.ne.jp/mzp/ みずぴー日記 https://mzp.hatenadiary.org/ Ocaml 30分プログラム 30分プログラム、その285。Problem 19 via Project Euler。 次の情報が与えられている。 1900年1月1日は月曜日である。 9月、4月、6月、11月は30日まであり、2月を除く他の月は31日まである。 2月は28日まであるが、うるう年のときは29日である。 うるう年は西暦が4で割り切れる年に起こる。しかし、西暦が400で割り切れず100で割り切れる年はうるう年でない。 20世紀（1901年1月1日から2000年12月31日）で月の初めの日曜日の数を数えよ。 特に工夫をせず、1900/1/1からの経過日を持ち回って、曜日を計算してみた。 使い方 $ ocamlbui… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fmzp.hatenadiary.org%2Fentry%2F20080412%2Fsun" title="Problem19 - みずぴー日記" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2008-04-12 00:00:00 rich https://mzp.hatenadiary.org/entry/20080412/sun 1.0 100%