Как определить високосный год в 1с

Определение високосного года в "1С:Предприятие" можно реализовать несколькими способами. Выбор способа зависит от контекста задачи и необходимой производительности.

Способ 1: Использование встроенной функции Год() и проверки делимости на 4, 100 и 400:

Это наиболее распространенный и простой способ. Он основан на математическом определении високосного года: год является високосным, если он делится на 4, но не делится на 100, или делится на 400.

Функция ЭтоВисокосныйГод(Год) Экспорт

Если Год % 4 = 0 Тогда

Если Год % 100 = 0 Тогда

Если Год % 400 = 0 Тогда

Возврат Истина;

Иначе

Возврат Ложь;

КонецЕсли;

Иначе

Возврат Истина;

КонецЕсли;

Иначе

Возврат Ложь;

КонецЕсли;

КонецФункции

Использование:

Год = 2024;

Если ЭтоВисокосныйГод(Год) Тогда

Сообщить("Год " + Год + " - високосный");

Иначе

Сообщить("Год " + Год + " - не високосный");

КонецЕсли;

Способ 2: Использование объекта Дата и функции КонецМесяца():

Этот способ основан на том, что в високосном году февраль содержит 29 дней. Мы можем проверить количество дней в феврале заданного года.

Функция ЭтоВисокосныйГодЧерезДату(Год) Экспорт

ДатаФевраля = Дата(Год, 2, 1); // 1 февраля заданного года

КонецФевраля = КонецМесяца(ДатаФевраля);

Возврат День(КонецФевраля) = 29;

КонецФункции

Использование:

Год = 2025;

Если ЭтоВисокосныйГодЧерезДату(Год) Тогда

Сообщить("Год " + Год + " - високосный");

Иначе

Сообщить("Год " + Год + " - не високосный");

КонецЕсли;

Способ 3: Использование объекта Дата и добавления одного года: (менее эффективный, но показывает альтернативный подход)

Этот способ менее очевиден, но он демонстрирует возможность работы с датами. Мы создаем дату 28 февраля заданного года и добавляем к ней один год. Если получившаяся дата - 29 февраля следующего года, то год високосный.

Функция ЭтоВисокосныйГодЧерезДату2(Год) Экспорт

Дата28Февраля = Дата(Год, 2, 28);

ДатаЧерезГод = ДобавитьМесяц(Дата28Февраля, 12);

Возврат День(ДатаЧерезГод) = 29 И Месяц(ДатаЧерезГод) = 2;

КонецФункции

Использование:

Год = 2028;

Если ЭтоВисокосныйГодЧерезДату2(Год) Тогда

Сообщить("Год " + Год + " - високосный");

Иначе

Сообщить("Год " + Год + " - не високосный");

КонецЕсли;

Сравнение способов:

• Способ 1 (деление): Наиболее быстрый и эффективный. Рекомендуется для большинства случаев.
• Способ 2 (КонецМесяца()): Чуть менее эффективный, чем первый, но более наглядный с точки зрения логики.
• Способ 3 (ДобавитьМесяц()): Наименее эффективный. Предназначен для демонстрации альтернативного подхода.

Рекомендации:

• Используйте Способ 1 (деление) для большинства случаев, когда требуется быстро и надежно определить, является ли год високосным.
• Если важна наглядность кода, можно использовать Способ 2 (КонецМесяца()).
• Избегайте использования Способа 3 (ДобавитьМесяц()) из-за его низкой производительности.
• Всегда тестируйте функции на различных значениях года, чтобы убедиться в их корректности.

Важно! Убедитесь, что функции ЭтоВисокосныйГод, ЭтоВисокосныйГодЧерезДату и ЭтоВисокосныйГодЧерезДату2 объявлены с ключевым словом Экспорт, если вы планируете использовать их в других модулях вашей конфигурации.