Всем доброго времени суток! Есть такая задачка,имеется три показателя.
1 показатель - 83.5%
2 показатель - 7.5%
3 показатель - 9%
В сумме должно получиться 100%, но показатели должны выводиться в целых числах.Если использовать Окр(), то 0.5 будет всегда округлять в большую сторону. Итог 84+8+9= 101. Если бы было 2 показателя, то можно из 100 - показатель 1, но их 3. Есть ли способ высчитать его? Как я думаю, можно высчитать дельту и вешать его на макс. показатель. У кого какие соображения?
КолОкр = 0;
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
ДробнаяЧасть = ВыборкаДетальныеЗаписи.Процент%1;
Если ДробнаяЧасть = 0.5 Тогда
КолОкр = КолОкр + 1;
КонецЕсли;
КонецЦикла;
КолОкр = КолОкр / 2;
ВыборкаДетальныеЗаписи.Сбросить();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
ДробнаяЧасть = ВыборкаДетальныеЗаписи.Процент%1;
ОбластьДетальныхЗаписей.Параметры.Заполнить(ВыборкаДетальныеЗаписи);
Если ДробнаяЧасть = 0.5 Тогда
Если Не КолОкр = 0 Тогда
Процент= Окр(ВыборкаДетальныеЗаписи.Процент);
КолОкр = КолОкр - 1;
Иначе
Процент= Окр(ВыборкаДетальныеЗаписи.Процент, 0,РежимОкругления.Окр15как10);
КонецЕсли;
ОбластьДетальныхЗаписей.Параметры.Процент= Процент;
КонецЕсли;
ТабДок.Вывести(ОбластьДетальныхЗаписей, ВыборкаДетальныеЗаписи.Уровень());
КонецЦикла;
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший