matlab算法实现对等额本息和等额本金两种还款方式的计算

matlab算法实现对等额本息和等额本金两种还款方式的计算

clc
clear
%date:2018-05-03
%author:猪猪侠
%思路：
%   1.输入：金额、利息、还款年数；
%   2.选择还款方式：是等额本金还款还是等额本息还款；
money=input('输入借款金额： ')
rate=input('输入年利率： ')/12
month=input('输入还款年份： ')*12
g=input('输入0为等额本金还款，输入1为等额本息还款： ')
if g==0
    %等额本金还款方式
        M=money/month     %每月偿还本金
        for j=1:month-1
            money(j+1)=money(j)-M %月初余额
        end
        R=money*rate      %月底的利息
        debt=money+R      %月底欠款
        M1=M+money*rate   %月还款额
        sum_R=sum(R)      %总利息
        sum_money=sum(M1) %还款总额
        M=M-zeros(1,month)
        data=[money',R',debt',M',M1']%月初所欠金额	利息额	月末所欠金额	偿还本金	月末付款
        [n,m]=size(data)
        result= cell(n+1,m)
        result(1,:)={'月初所欠金额','利息额','月末所欠金额','偿还本金','月末付款'}
        result(2:end,:) = num2cell(data)
       xlswrite('data.xlsx',result,'等额本金还款方式')%输出excel
elseif g==1
        %等额本息还款方式
        M=money*(rate*(1+rate)^month)/((1+rate)^month-1)%月还款额
        for i=1:month-1
            money(i+1)=money(i)*(1+rate)-M %月初金额
        end
        R=money*rate      %月底的利息
        mon=M-R%每月偿还本金
        debt=money+R      %月底欠款
        sum_R=sum(R)      %总利息
        sum_money=M*month %还款总额
        M=M-zeros(1,month)
        data=[money',R',debt',M'-R',M']%月初所欠金额	利息额	月末所欠金额	偿还本金	月末付款
        [n,m]=size(data)
        result= cell(n+1,m)
        result(1,:)={'月初所欠金额','利息额','月末所欠金额','偿还本金','月末付款'}
        result(2:end,:) = num2cell(data)
       xlswrite('data.xlsx',result,'等额本息还款方式')%输出excel
end