银行贷款问题.doc

房产贷款还贷本息计算程序 （供学号尾数是5和0的同学用）居民购房时若资金不足可用住房作抵押向银行贷款（即向银行借钱），借款人偿还银行贷款的常用方式有两种：等额本金还款方式、等额本息还款方式。（1）等额本金还款方式：在贷款期内，每月等额偿还贷款本金，并根据剩余本金计算利息付给银行。当月还款金额=月应还本金+当月应还利息=贷款本金贷款期数（按月计）+（贷款本金累计已归还本金额）月利率 式中，贷款本金就是借款总额，此处用A表示；贷款计息周期有年、半年、季和月，但这里常用月；月利率=年利率/12。（日利率=年利率/360。）设贷款期数为N，即设分N月（期）还清贷款，则第i月还款金额:此式计算月利息未考虑不同天数月份的差别。从上可知，月应还本金始终为A/N，月应还利息逐月减少，因此月应还金额也逐月减少。（2）等额本息还款方式：每个月偿还的金额是一固定值，即每月偿还的本金与利息之和不变。在每月偿还的金额中，本金随着还款时间推移而逐渐增加，利息随着还款时间推移而逐渐减少，也就是说用等额本息法还款时，开始主要是还利息，最后才是还本金。假设每月偿还的金额为x，则该式可如下推导：最初欠银行贷款：A，即贷款本金；第1期末欠银行贷款：A(1+)，还款后尚欠贷款A(1+)-x； 第2期末欠银行贷款：(A(1+)-x) (1+)，还款后尚欠贷款：(A(1+)-x) (1+)-x=A(1+)2- x1+(1+)= A(1+)2- x(1+)2-1 /；第3期末欠银行贷款：A(1+)2- x1+(1+) (1+)，还款后尚欠贷款：A(1+)2- x1+(1+) (1+)-x=A(1+)3- x1+(1+)+ (1+)2= A(1+)3- x(1+)3-1 /；.第i期末还款后尚欠贷款：A(1+)i- x(1+)i -1 /；第N期末还款后尚欠贷款：A(1+)N- x(1+)N-1 /。而此时正好还清所有贷款，固有A(1+)N- x(1+)N-1 /=0，从而可求出x。下面介绍第i月末应还利息和第i月应还本金计算方法。1) 递推计算法： 第1月末应还利息=贷款本金月利率=A；第1月末应还本金=x - 第1月末利息；第1月末还款后仍欠贷款=贷款本金 - 第1月末应还本金；第2月末应还利息=第1月末还款后仍欠贷款月利率；第2月末应还本金=x - 第2月末利息；第2月末还款后仍欠贷款=第1月末还款后仍欠贷款 - 第2月末应还本金；.第i月末应还利息=第i-1月末还款后仍欠贷款月利率；第i月末应还本金=x - 第i月末利息；第i月末还款后仍欠贷款=第i-1月末还款后仍欠贷款- 第i月末应还本金；2) 公式计算法：显然有：要求：(1) 输入贷款金额、还款期数、年利率、选择还款方式后，在屏幕上输出如下格式数据（表格线可以不画出）：贷款金额：100000年利率：0.0464还款期数：24还款方式：等额本息月还款额：4371.034404月利率：0.003866667期数期初欠款（￥）利息（￥）本金（￥）1100000.00 386.67 3984.37 296015.63 371.26 3999.77 392015.86 355.79 4015.24 238691.62 33.61 4337.43 244354.20 16.84 4354.20 250.00 0.00 0.00 并求支付利息的总额。(2)将上述表格形式数据写入文本文件。下面是解答：/ 银?行D贷?款?问题琣.cpp : 定义?控?制?台?应畖用?程序的?入?口点?。/#define NULL 0#include stdafx.h#include#include#include#include using namespace std;struct datadoubleLixi,Benjin,TotalLoan;class Loanprivate:double Loan_Benjin,InterestRate;/贷?款?总哩?额?，?年利?率。double Times;/归还1期数簓public:Loan()Loan_Benjin=0;InterestRate=0;Times=0;Loan(double num1,double num2,double Time)/贷?款?总哩?额?，?年利?率，?归还1本?金e。 Loan_Benjin=num1; InterestRate=num2; Times=Time;void Method1()double InterestRate2;data* admin(nullptr);admin=new data6;InterestRate2=InterestRate/12.0;for(int i=1;iTotalLoan=Loan_Benjin; admin-Benjin=Loan_Benjin/Times; admin-Lixi=admin-TotalLoan*InterestRate2;elseadmini-1.TotalLoan=admini-2.TotalLoan-Loan_Benjin/Times;admini-1.Lixi=admini-1.TotalLoan*InterestRate2;/利?息=欠款?*月?利?率admini-1.Benjin=Loan_Benjin/Times;/每?个?月?应畖还1的?本?金e不?变?if(i%6=0)/动态?内存?分?配? data* temp;/交?换?用?数簓组哩?temp=new datai;for(int j=0;ji;j+)*(temp+j)=*(admin+j);delete admin;/删?除yadmin=new datai+6;/新?建，?比括?原-本?数簓组哩?要癮增?加6维?for(int j=0;ji;j+)*(admin+j)=*(temp+j);delete temp;/删?除y临?时骸?交?换?数簓组哩? ofstream ofile; ofile.open(file.dat,ios:binary);/ if(!ofile) cerrFile Open Or Create Failendl; return; for(int i=0;iTimes;i+) ofile.write(char *)(&admini),sizeof(struct data); ofile.close(); cout等台?额?本?金e信?息的?文?件t保馈?存?成功|！?endl; delete admin;void Method2()double InterestRate2,PaymentPerMon,a=1;data* admin2(nullptr);admin2=new data6;InterestRate2=InterestRate/12.0;for(int i=1;i=Times;i+)a=a*(1+InterestRate2);PaymentPerMon=(Loan_Benjin*InterestRate2*a)/(a-1);/每?个?月?应畖该?还1的?金e额?。for(int i=1;iTotalLoan=Loan_Benjin;admin2-Lixi=admin2-TotalLoan*InterestRate2;admin2-Benjin=PaymentPerMon-admin2-Lixi;elseadmin2i-1.TotalLoan=admin2i-2.TotalLoan-admin2i-2.Benjin;admin2i-1.Lixi=admin2i-1.TotalLoan*InterestRate2;admin2i-1.Benjin=PaymentPerMon-admin2i-1.Lixi;if(i%6=0)/动态?内存?分?配? data* temp;/交?换?用?数簓组哩?temp=new datai;for(int j=0;ji;j+)*(temp+j)=*(admin2+j);delete admin2;/删?除yadmin2=new datai+6;/新?建，?比括?原-本?数簓组哩?要癮增?加6维?for(int j=0;ji;j+)*(admin2+j)=*(temp+j);delete temp;/删?除y临?时骸?交?换?数簓组哩? ofstream ofile; ofile.open(file2.dat,ios:binary);/ if(!ofile) cerrFile Open Or Create Failendl; return; for(int i=0;iTimes;i+) ofile.write(char *)(&admin2i),sizeof(struct data); ofile.close(); delete admin2;cout等台?额?本?息还1款?方?式?信?息保馈?存?成功|！?endl;void OpenFile1()data* admin_data(nullptr);admin_data=new data6;ifstream ifile; ifile.open(file.dat,ios:binary); if(!ifile) cerrFile Open Failendl; return; for(int i=0;iTimes;i+) if(i%6=0)/动态?内存?分?配? data* temp;/交?换?用?数簓组哩?temp=new datai;for(int j=0;ji;j+)*(temp+j)=*(admin_data+j);delete admin_data;/删?除yadmin_data=new datai+6;/新?建，?比括?原-本?数簓组哩?要癮增?加6维?for(int j=0;ji;j+)*(admin_data+j)=*(temp+j);delete temp;/删?除y临?时骸?交?换?数簓组哩? ifile.read(char *)(&admin_datai),sizeof(struct data); cout贷?款?金e额?：阰TotalLoan 年利?率：阰InterestRateendl; cout还1款?期数簓:Times 还1款?方?式?:等台?额?本?金eendl; cout月?还1本?金e Benjinsetw(15)月?利?率:InterestRate/12.0endl; cout期数簓 期初?欠款? 利?息 本?金eendl; for(int i=0;iTimes;i+) couti+1 admin_datai.TotalLoan admin_datai.Lixi admin_datai.Benjinendl; ifile.close();void OpenFile2()data* admin_data(nullptr);admin_data=new data6;ifstream ifile; ifile.open(file2.dat,ios:binary); if(!ifile) cerrFile Open Failendl; return; for(int i=0;iTimes;i+) if(i%6=0)/动态?内存?分?配? data* temp;/交?换?用?数簓组哩?temp=new datai;for(int j=0;ji;j+)*(temp+j)=*(admin_data+j);delete admin_data;/删?除yadmin_data=new datai+6;/新?建，?比括?原-本?数簓组哩?要癮增?加6维?for(int j=0;ji;j+)*(admin_data+j)=*(temp+j);delete temp;/删?除y临?时骸?交?换?数簓组哩? ifile.read(char *)(&admin_datai),sizeof(struct data); cout贷?款?金e额?：阰TotalLoan 年利?率：阰InterestRateendl; cout还1款?期数簓:Times 还1款?方?式?:等台?额?本?息endl; cout月?还1款?额? Lixi+admin_data-Benjinsetw(15)月?利?率:InterestRate/12.0endl; cout期数簓 期初?欠款? 利?息 本?金eendl; for(int i=0;iTimes;i+) couti+1 admin_datai.TotalLoan admin_datai.Lixi admin_datai.Benjinendl; ifile.close();int main()int Choise;double num1, num2,Time;/贷?款?总哩?额?，?年利?率，?归还1本?金e。coutnum1num2Time;Loan Admin1(num1, num2,Time);char ch;docoutendl选?择?还1款?方?式?:endl-endl;cout1,等台?额?本?金eendl2,等台?额?本?息Choise;switch(Choise)case 1:Admin1.Method1(