Нашли ошибку? Выделите
текст с ошибкой и нажмите кнопку "Сообщить об ошибке"
или CTRL+ENTER.
Справочная
система на версию 10.6
от 08/10/2024,
© ООО «ФОРСАЙТ»,
DollarDe(FractionValue: Double; Fraction: Integer): Double;
| Параметры | Описание | Ограничения |
| FractionValue | Число, состоящее из целой и дробной частей, разделенных десятичным разделителем. | Больше либо равно 0. |
| Fraction | Целое, которое нужно использовать в качестве знаменателя. | Не равно 0. |
Метод DollarDe преобразует цену в рублях, выраженную в виде дроби, в цену в рублях, выраженную десятичным числом.
DollarDe вычисляется следующим образом:
DollarDe = FV + Value/(0.1k × Fraction),
где:
FV. Целая часть FractionValue;
Value. Дробная часть FractionValue;
k. Наименьшее положительное число, при котором 0.1k × Fraction меньше «1».
Для выполнения примера добавьте ссылку на системную сборку MathFin.
Sub UserProc;
Var
r: Double;
Begin
r := Finance.DollarDe(1.02, 16);
Debug.WriteLine(r);
End Sub UserProc;
В результате выполнения примера в окно консоли будет выведено преобразование, равное «1.125». Пример преобразует число 1,02, читаемое как 1 целая и 2/16, в десятичное число «1,125». Поскольку значение Fraction равно 16, цена выражается с точностью до 1/16 рубля.
См. также: