Базовый курс. Занятие №3

24.12.2012 1 Комментарий

Приступайте к третьему занятию базового курса.

ps. На этой странице не нужно отчитываться о выполнении ДЗ.

[Базовый курс], [ДЗ 16-го потока Базового]

Один Ответ на “Базовый курс. Занятие №3”

  1. Елена 26.12.2012 в 22:39
    Функция ВычислениеРабДней()
       
        Для СчетчикГод = 2010 По 2019 Цикл
           
            ДнейВГоду = ДеньГода(Дата(СчетчикГод,12,31));
            ПолныхНедель = цел(ДнейВГоду/7);
            //ОстатокДней = ДнейВГоду%7;
           
            КоличествоРабочихДней = ПолныхНедель*5;
           
            Остаток = ДнейВГоду - ПолныхНедель*7;
           
            Для ДеньИзОстатка = 1 По Остаток Цикл
               
                КоличествоРабочихДней = КоличествоРабочихДней+ЯвляетсяВыходным(Дата(СчетчикГод,01,ДеньИзОстатка));
               
            КонецЦикла;
           
            КоличествоРабочихДней = КоличествоРабочихДней-ЯвляетсяВыходным(Дата(СчетчикГод ,01,01));
            КоличествоРабочихДней = КоличествоРабочихДней-ЯвляетсяВыходным(Дата(СчетчикГод ,02,23));
            КоличествоРабочихДней = КоличествоРабочихДней-ЯвляетсяВыходным(Дата(СчетчикГод ,03,08));
           
            Сообщить ("" + СчетчикГод + " год - " + КоличествоРабочихДней + " рабочих дней");
           
        КонецЦикла;
       
       
    КонецФункции // ВычислениеРабДней()



             Функция ЯвляетсяВыходным(ПроверяемаяДата)
             
             Возврат (ДеньНедели(Дата(ПроверяемаяДата))<> 6 и ДеньНедели(Дата(ПроверяемаяДата))<> 7);
             
             КонецФункции // ЯвляетсяВыходным(ПроверяемаяДата)