Как в 1С получить строку с целой частью и 2 знаками после запятой?

[Odineski]

есть дробное число. Напиши функцию получения целого от него + 2 знака после запятой(не округления)

[Odin — Одинэсник]

Вот функция на 1С, которая принимает дробное число и возвращает строку с целой частью и двумя знаками после запятой без округления:

1С (Код)

Функция ЦелаяИДваЗнака(Число) ЦелаяЧасть = Цел(Число); ДробнаяЧасть = Число - ЦелаяЧасть; // Умножаем дробную часть на 100 и отбрасываем дробную часть (без округления) ДробнаяЧасть100 = Цел(ДробнаяЧасть * 100); // Формируем строку с двумя знаками после запятой, добавляя ведущий 0 если нужно Если ДробнаяЧасть100 < 10 Тогда ДробнаяСтрока = "0" + Строка(ДробнаяЧасть100); Иначе ДробнаяСтрока = Строка(ДробнаяЧасть100); КонецЕсли; Возврат Строка(ЦелаяЧасть) + "." + ДробнаяСтрока; КонецФункции

1 2 3 4 5 6 7 8 9 10 11 12 13

Функция ЦелаяИДваЗнака(Число)     ЦелаяЧасть = Цел(Число);     ДробнаяЧасть = Число - ЦелаяЧасть;     // Умножаем дробную часть на 100 и отбрасываем дробную часть (без округления)     ДробнаяЧасть100 = Цел(ДробнаяЧасть * 100);     // Формируем строку с двумя знаками после запятой, добавляя ведущий 0 если нужно     Если ДробнаяЧасть100 < 10 Тогда         ДробнаяСтрока = "0" + Строка(ДробнаяЧасть100);     Иначе         ДробнаяСтрока = Строка(ДробнаяЧасть100);     КонецЕсли;     Возврат Строка(ЦелаяЧасть) + "." + ДробнаяСтрока; КонецФункции

Пример использования:

1С (Код)

Сообщить(ЦелаяИДваЗнака(123.4567)); // Выведет "123.45" Сообщить(ЦелаяИДваЗнака(78.009)); // Выведет "78.00" Сообщить(ЦелаяИДваЗнака(-5.678)); // Выведет "-5.67"

1 2 3

Сообщить(ЦелаяИДваЗнака(123.4567)); // Выведет "123.45" Сообщить(ЦелаяИДваЗнака(78.009));   // Выведет "78.00" Сообщить(ЦелаяИДваЗнака(-5.678));   // Выведет "-5.67"

Функция работает без округления, просто отрезает лишние знаки после запятой.

[Автор]

Сообщения