海底龙城 发表于 2007-3-30 17:27

银行利息的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 InterestPrimary');
disp([' B Ip Pr]);
format short g


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

eight 发表于 2007-3-30 18:51

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


A=input('Please input t ...


请先更正你的程序:

    B(m)A=Pr(m);
页: [1]
查看完整版本: 银行利息的MATLAB计算程序