Форум: "Основная";
Текущий архив: 2004.12.19;
Скачать: [xml.tar.bz2];
Вниз
Есть ли функция определяющая високосный год или нет? Найти похожие ветки
← →
Denmin © (2004-12-03 15:13) [0]Здравствуйте.
Скажите пожалуйста, есть ли стандартная функция определяющая високосный год или нет?
Заранее благодарен.
← →
MBo © (2004-12-03 15:18) [1]см. справку по Date/time routines
← →
BlackTr (2004-12-03 15:19) [2]IsLeapYear
← →
begin...end © (2004-12-03 15:21) [3]Насчёт Delphi 5 - не в курсе, а в Delphi 7 есть. Называется IsInLeapYear.
← →
Verg © (2004-12-03 15:31) [4]Ой да, функция та уж прямо такая :) В одну строку.
function IsLeapYear(Year: Word): Boolean;
begin
Result := (Year mod 4 = 0) and ((Year mod 100 <> 0) or (Year mod 400 = 0));
end;
← →
Denmin © (2004-12-03 15:40) [5]спасибо.
← →
Denmin © (2004-12-03 15:45) [6]спасибо.
← →
Shadow-st (2004-12-03 16:03) [7]А нельзя просто поделить год на 4 и если нет сотатка то год високосный????
← →
Jeer © (2004-12-03 17:42) [8]Shadow-st (03.12.04 16:03) [7]
Это слишком просто:))
Будет тебе подмножество високосных и даже некоторые невисокосные.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.12.19;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.036 c
