我正在尝试计算以下场景的每月付款:
5,000 美元以 8.00% 的利率借用 3 年,每月复利,1,000 美元在期限结束时到期。
/*
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
结果 = -181.351526101918
结果是正确的,只是它是否定的。
为什么支付函数的结果返回一个负数?