8.х Округление

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 8"", создана пользователем alexburn, 12 май 2009.

  1. TopicStarter Overlay
    alexburn
    Offline

    alexburn Модераторы Команда форума Модератор

    Регистрация:
    5 янв 2009
    Сообщения:
    14.750
    Симпатии:
    509
    Баллы:
    204
    Приветствую Вас! Кто может подсказать как реализовать такое округление:
    Например: 15.73->16.00; 14.23->14.50
    Т.е. округление идет только по 0.50
  2. lazy
    Offline

    lazy Модераторы Команда форума Модератор

    Регистрация:
    1 сен 2007
    Сообщения:
    2.127
    Симпатии:
    4
    Баллы:
    29
    Должно получится нечто вроде:
    Код:
    Функция МоеОкругление(МоеЧисло)
    ЦелаяЧастьЧисла = Цел(МоеЧисло);
    ДробнаяЧасть = МоеЧисло - ЦелаяЧастьЧисла;
    Если ДробнаяЧасть < 0.5 Тогда
    Возврат(ЦелаяЧастьЧисла+0.5);
    Иначе
    Возврат(ЦелаяЧастьЧисла);
    КонецЕсли;
    КонецФункции
    
    
    
    Просто пример, направление работы. Над окончательной версией алгоритма предлагаю поработать самостоятельно.
  3. tirk
    Offline

    tirk Опытный в 1С

    Регистрация:
    1 сен 2008
    Сообщения:
    1.142
    Симпатии:
    0
    Баллы:
    26
    проще возьми штатную процедуру округления в любой из конфигураций а вообще есть функция округления в языке в большую сторону..

Поделиться этой страницей