うるう年の求め方を教えてください。

質問

うるう年の求め方を教えてください。

回答No.2

neko-tama · ベストアンサー

4で割れる年をうるう年とする。
ただし，100で割れる年は平年にする。
ただし，400で割れる年はうるう年とする。
例：1700年，1800年，1900年は平年。
2000年はうるう年です 。

回答No.5

yoin

つい最近、Ｃ＋＋の試験で出ました。
ＮＯ．２さんの回答に一票です。

回答No.4

he-goshite-

平成11年度秋期の「初級シスアド」の午後問６に次のような問題がでていました。

設問１
指定された年がうるう年ならば１，平年であれば０となるような計算式を，セルＢ５に入力した。計算式の＿＿＿に入れる適切な字句を，回答群の中から選べ。解答は重複して選んでもよい。
IF（剰余（＿a＿ ，4) ＿b＿ 0，0，
　IF（剰余（＿c＿ ，100）＿d＿ 0，1，
　　IF（剰余（＿e＿ ，400）＿f＿ 0，1，0）））
a,c,e に関する解答群
　（略）
b,d,f に冠する解答群
　（略）

で，解答は
a,c,e には指定年の数値（たとえば今年なら 2003）が入力されているセルアドレスが入り，
b,d,f には 順に ≠，≠，＝ が入ります。
Excelが手元にあれば試してみてください。
蛇足ですが，この計算法によるうるう年の決め方を「グレゴリオ暦」といっています。

回答No.3

noname#27115

すでにロジックについては回答がついているんで、簡単に・・・

Dim Ly(2) As Integer'余りを入れる変数を3つ用意します。

Ly(0) = tY Mod 4'4で割った時の余り
Ly(1) = tY Mod 100'100で割った時の余り
Ly(2) = tY Mod 400'400で割った時の余り

If (Ly(0) = 0 And Ly(1) <> 0) Or Ly(2) = 0 Then

'ここに閏年の処理を書きましょう。

End If

回答No.1

himekou43-e

一般的には、４００年の間で９７回、つまり
(1)西暦で、４の倍数の年
(2)４００で割れない年は、閏年にしない
です。
したがって西暦１９００年は、閏年ではなかったはずです。

計算式のお尋ねだったのでしょうか？