Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Помогите пожалуйста решить мне задачу [D7, XP]


VanDet ©   (2006-02-14 17:49:00) 

Даны дата (число, месяц, год) по юлианскому календарю. Получить эту дату по современному календарю.
                                      С уважением Тихонов Иван Юрьевич


Рамиль   (2006-02-14 18:05:00) [1]


> MBo ©   (14.02.06 18:03) [1]

Ну, вот, как всегда, кто то уже написал :)


Рамиль   (2006-02-14 18:04:00) [2]

если нет стандартных функций, то воспользоваться таблицей
http://everyday.com.ua/timeline/cal-difs.htmтипа этой. Или вычислять на основе формулы определения високосного года в григорианском и юлианском календарях. В юлианском это каждый год, кратный четырем. В григорианском так же, но високосными не считаются год кратный 400 (вроде так, точно не помню, уточните формулу, ссылок в интернете полно)


MBo   (2006-02-14 18:03:00) [3]

Загляни в модуль DateUtils.pas


Наверх

Титульная страница Поиск, карта сайта Написать письмо