银行利息的MATLAB计算程序

海底龙城

很多朋友毕业后，说不定要赶着结婚买房子，当今除非发横财了，否则，买房子只有靠贷款了，现在有个小程序自己就可以知道每个月还多少钱就可以安心享受房子和不用担心银行骚扰你！


A=input('Please input the amount of load A=');
M=input('Please input the number of months M=');
R=input('Please input the monthly interest rate R=');
P=A*(R*(1+R)^M/((1+R)^M-1));
B=zeros(M,1);
Ip=B;
Pr=B
for m=1:M
    if m==1
        Ip(m)=A*R;
    else
        Ip(m)=R*B(m-1);
    end
    Pr(m)=P-Ip(m);
    if m==1
        B(m)A=Pr(m);
    else
        B(m)=B(m-1)-Pr(m);
    end
end
format bank
disp(['Amount of your load='num2str(A)]);
disp(['Monthly interest rate='num2str(R)]);
disp(['Number of months='int2str(M)]);
disp(['Payment='num2str(P)]);
disp('');
disp('          Amortization Schedule');
disp('Payment Balance Interest  Primary');
disp([[1:M]' B Ip Pr]);
format short g


希望大家对此批评考证！谢谢！

eight

原帖由 海底龙城 于 2007-3-30 17:27 发表
很多朋友毕业后，说不定要赶着结婚买房子，当今除非发横财了，否则，买房子只有靠贷款了，现在有个小程序自己就可以知道每个月还多少钱就可以安心享受房子和不用担心银行骚扰你！


A=input('Please input t ...

请先更正你的程序：

1. 
   
2.     B(m)A=Pr(m);
   

复制代码