---

Процедура ВыводДняНедели(СегодняшняяДата)
    
    Если ДеньНедели(СегодняшняяДата) = 1 Тогда
        Сообщить("Сегодня " + СегодняшняяДата + " - Понедельник, будний день");
    ИначеЕсли ДеньНедели(СегодняшняяДата) = 2 Тогда
        Сообщить("Сегодня " + СегодняшняяДата + " - Вторник, будний день");
    ИначеЕсли ДеньНедели(СегодняшняяДата) = 3 Тогда
        Сообщить("Сегодня " + СегодняшняяДата + " - Среда, будний день");
    ИначеЕсли ДеньНедели(СегодняшняяДата) = 4 Тогда
        Сообщить("Сегодня " + СегодняшняяДата + " - Четверг, будний день");
    ИначеЕсли ДеньНедели(СегодняшняяДата) = 5 Тогда
        Сообщить("Сегодня " + СегодняшняяДата + " - Пятница, будний день");
    ИначеЕсли ДеньНедели(СегодняшняяДата) = 6 Тогда
        Сообщить("Сегодня " + СегодняшняяДата + " - Суббота, выходной день");
    ИначеЕсли ДеньНедели(СегодняшняяДата) = 7 Тогда
        Сообщить("Сегодня " + СегодняшняяДата + " - Воскресенье, выходной день");
    КонецЕсли;
    
КонецПроцедуры

Процедура ВыводДняНеделиДля31Декабря()
    
    ТекущийГод = Год(ТекущаяДата());
    
    Для Счетчик = 0 По 9 Цикл
        
        Дата31Дек = Дата(ТекущийГод + Счетчик, 12, 31);
        
        Если ДеньНедели(Дата31Дек) = 1 Тогда
            Сообщить("31 декабря " + (ТекущийГод + Счетчик) + " года - Понедельник");
        ИначеЕсли ДеньНедели(Дата31Дек) = 2 Тогда
            Сообщить("31 декабря " + (ТекущийГод + Счетчик) + " года - Вторник");
        ИначеЕсли ДеньНедели(Дата31Дек) = 3 Тогда
            Сообщить("31 декабря " + (ТекущийГод + Счетчик) + " года - Среда");
        ИначеЕсли ДеньНедели(Дата31Дек) = 4 Тогда
            Сообщить("31 декабря " + (ТекущийГод + Счетчик) + " года - Четверг");
        ИначеЕсли ДеньНедели(Дата31Дек) = 5 Тогда
            Сообщить("31 декабря " + (ТекущийГод + Счетчик) + " года - Пятница");
        ИначеЕсли ДеньНедели(Дата31Дек) = 6 Тогда
            Сообщить("31 декабря " + (ТекущийГод + Счетчик) + " года - Суббота");
        ИначеЕсли ДеньНедели(Дата31Дек) = 7 Тогда
            Сообщить("31 декабря " + (ТекущийГод + Счетчик) + " года - Воскресенье");
        КонецЕсли;
        
    КонецЦикла;
    
КонецПроцедуры

Процедура ПриНачалеРаботыСистемы()
    
    // Задача 3.1
    ВыводДняНедели(ТекущаяДата());
    
    // Задача 3.2
    ВыводДняНеделиДля31Декабря();
    
КонецПроцедуры