I. МАТЕМАТИЧЕСКИЕ ФУНКЦИИ И ПРОЦЕДУРЫ

7. Функции и процедуры для финансовых вычислений

Функция NumberOfPeriods (
Rate, Payment, PresentValue, FutureValue: Extended;
PaymentTime: TPaymentTime ): Extended;

Модуль: Math

Описание
Функция определяет количество этапов, необходимых для погашения кредита до значения определенного в параметре FutureValue.
PresentValue - первоначальная сумма кредита.
Rate - процентная ставка.
Payment - величина регулярных выплат.
Параметр PaymentTime определяет, происходят выплаты в начале (PtStartOfPeriod) этапа или в его конце (ptEndOfPeriod).

Пример
Первоначальная сумма кредита составляет 364руб. Процентная ставка 20%. Регулярные ежемесячные выплаты по 100руб производятся в конце месяца. Рассчитаем сколько месяцев необходимо для полной выплаты кредита.

var

Np: Extended;

begin

...
Np:= NumberOfPeriods ( 0.2, 100, 364, 0, ptEndOfPeriod);
    { Np:= -3 }
...

end;

[Вернуться к содержанию]