教えて下さい！!

2002年7月8日(月)を基準とし、2015年の7月8日の曜日をだすプログラムを教えて下さい。

No.1 回答者： haru0000 回答日時： 2002/07/08 20:58

プログラムと一口にいっても何の言語かによって作り方がかわってきます。

まずは、どの言語での回答をもてめているかをかきましょう。

No.2 回答者： the_rocky 回答日時： 2002/07/08 21:01

カレンダーのアルゴリズムでしょうか？

こちらのサイトにLINUXで日数計算をするプログラムが解説されています。
文法はPERLですが、だいたいわかると思います。
CGIでカレンダーを作成するプログラムをよく見かけますので、参考になると思います。

参考URL：http://sd.znet.com/~penguin/perl/learn/page3.html

No.3 回答者： ymmasayan 回答日時： 2002/07/08 21:31

じっくり考えれば面白いですよ。

３６５／７＝５２あまり１　つまり同じ月日は１年ごとに一つ次の曜日に行きます。
ところがうるう年が入ると２月より後は更に一つ進みます。
質問の例では、１３年後ですが、うるう年が2004,2008,2012年の３回あります。
１３＋３＝１６　これは１６＝７＋７＋２　で曜日が２つ進むのですね。
つまり水曜日です。
後はお好きにプログラムにしてください。

No.4 回答者： imogasi 回答日時： 2002/07/08 21:44

「2002年7月8日(月)を基準とし」とあるところから、多分VBか何か

で組むことを求めているのでしょうが、VBAなら
Private Sub CommandButton1_Click()
w = Array("", "日", "月", "火", "水", "木", "金", "土")
a = Application.WorksheetFunction.Weekday(Cells(6, 1))
MsgBox a
Cells(6, 2).Value = w(a)
End Sub
で出来ます。A6に日付を２００２／７／８とか入れて、B6に「月」
と出します。このWeekｄay関数に当たるものを作れば良いわけ
です。且つ今日より過去の日付は入れないという前提で良い
仮定となっている。