Я пытаюсь вычислить ежемесячный платеж по следующему сценарию:Почему Math.Payment Функция Delphi, возвращает отрицательное число
$ 5000 заимствован в течение 3 лет на 8,00% усугубляются ежемесячно $ 1000 из-за в конце срок.
/*
From Math.pas
function Payment(Rate: Extended;
NPeriods: Integer;
const PresentValue: Extended;
const FutureValue: Extended;
PaymentTime: TPaymentTime): Extended;
*/
var
Pmt : Extended;
begin
Pmt := Payment(0.08/12,36,5000,1000,ptEndOfPeriod);
Edit1.Text := FloatToStr(Pmt);
end
Result = -181,351526101918
результат является правильным, за исключением отрицательно.
Почему результат функции «Оплата» возвращает отрицательное число?