Кол-во дней в месяце

← →
Lexxxx (2003-12-15 10:08) [0]

Люди подскажите как узнать кол-во дней в месяце???

← →
Anatoly Podgoretsky © (2003-12-15 10:10) [1]

← →
TUser © (2003-12-15 10:12) [2]

((mesac mod 7) mod 2)+30 - Это все, кроме февраля. А февраль - поищи алгоритм определения високосности года (недавно на форуме это обсуждалось).

← →
wal © (2003-12-15 10:13) [3]

← →
Silver Alex © (2003-12-15 10:14) [4]

подлючи модуль DateUtils функция DaysInMonth

← →
Кщд (2003-12-15 10:47) [5]

TUser © (15.12.03 10:12) [2]
алгоритм високосности?

← →
Ega23 © (2003-12-15 10:49) [6]

IncMonth(aDateTime)-aDateTime

← →
lexxxx (2003-12-15 10:51) [7]

Всем спасибо подключил DateUtils функция вычисляет

← →
TUser © (2003-12-15 12:03) [8]

> алгоритм високосности?

Ну, там что-то типа такого. Високосным является каждый год, который делится на 4, кроме тех, которые делятся на 400, кроме тех, которые делятся на 2000.
((year mod 4) = 0) and ((not ((year mod 400)=0)) or ((yaer mod 2000) = 0))
Вот такое редкое событие недавно случилось - год нацело разделился на 2000.

← →
Anatoly Podgoretsky © (2003-12-15 12:09) [9]

Нечто новое в теории вычисления високосных лет, на нобелевку тянет.

← →
Silver Alex © (2003-12-15 12:12) [10]

> алгоритм високосности?

SysUtils.IsLeapYear

← →
TUser © (2003-12-15 13:25) [11]

2 Anatoly Podgoretsky
В этом году уже опоздал. А если честно - действительно ошибся. Невисокосными являются года, которые не далятся на 4, или делятся на 100 или делятся на 100, но еще делятся и на 400. А вот те, которые на 2000 делятся - надо вспомнить, был ли 2000 год високосным.

← →
Anatoly Podgoretsky © (2003-12-15 13:31) [12]

2000 високосный, 4000 не високосный

← →
Кщд (2003-12-15 13:34) [13]

Silver Alex © (15.12.03 12:12) [10]
собственно, меня слово алгоритм порадовало
вот и усё :)

TUser © (15.12.03 13:25) [11]
я понял, что я ничего в математике не понимаю.
оставляю эту сложную науку Вам.
успехов. :)

← →
Плохиш_ (2003-12-15 13:46) [14]

>Anatoly Podgoretsky © (15.12.03 13:31) [12]

> 4000 не високосный

с чего бы это?

Давным давно видел формулу в справочнике, там кроме 400 фигурировало еще и 4000, в стандартных функциях так далеко не заглядывают.

← →
Плохиш_ (2003-12-15 14:01) [16]

Справочник был 60 годов, да в принципе и не важно, текушии алгоритмы применимы вплоть до 3999 года, большинству больше и не надо.
Этот интервал связан с тем, что за 3800 лет ошибка составляет 1 день, по отношению к 2000 году.

Правда утверждать особо не буду, поскольку эту формулу видел только в одном старом справочнике алгоритмов.

← →
Плохиш_ (2003-12-15 14:35) [18]

Ха, нашёл ;-)

http://en2.wikipedia.org/wiki/Leap_year

Папа не принял 4000 :-)

Но обещал вернуться к этой проблеме, когда она станет актуальной

← →
Плохиш_ (2003-12-15 15:04) [20]

:-)

Кол-во дней в месяце Найти похожие ветки