PostHeaderIconDelphi. Функция PeriodPayment( Rate: Extended; Period, NPeriods: Integer; PresentValue, FutureValue: Extended; PaymentTime: TPaymentTime ): Extended;

Функция PeriodPayment( Rate: Extended; Period, NPeriods: Integer; PresentValue, FutureValue: Extended; PaymentTime: TPaymentTime ): Extended;

Модуль: Math

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

Сумму выплачиваемых процентов кредита можно вычислить с помощью функции InterestPayment.

Пример
var
   PaySum : Extended;
begin
  ...
   PaySum:= PeriodPayment(0.1, 2, 5, 1000, 0, ptEndOfPeriod);
      { PaySum:= -180.17722887422 }
  ...
end;

 
Copyright © 2007-2010 IsIProg.ru. All Rights Reserved.