【发布时间】:2009-12-19 21:04:31
【问题描述】:
我正在尝试计算以下场景的每月付款:
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
结果是正确的,只是它是否定的。
为什么支付函数的结果返回负数?
【问题讨论】:
标签: delphi math delphi-2010 financial