Fortran please

1. Suppose a loan of r dollars carries a monthly interest rate of r, and is to be paid off in n months. The monthly payment p is given by r(1+r)" p= = 1 (1+r)" -1) A portion of each monthly payment goes toward repaying that month's accrued inter- est, while the remainder reduces the amount owing the principal). Write a Fortran program to print an amortization table, which displays the current balance, the pay- ment, the monthly interest amount, and the amount of the payment applied to the principal, for each month. Test your code for several examples of loan amount (1), interest rate (r), and loan period (n). Sample input/output: Enter the amount of the loan 1500 Enter the interest rate .05 Enter the time (in months) 10 Month 0 1 2 3 4 5 Payment Interest Principal Balance 1500.00 194.26 75.00 119.26 1380.74 194.26 69.04 125.22 1255.52 194.26 62.78 131.48 1124.04 194.26 56.20 138.05 985.99 194.26 49.30 144.96 841.03 194.26 42.05 152.21 688.82 194.26 34.44 159.82 529.01 194.26 26.45 167.81 361.20 194.26 18.06 176.20 185.00 194.25 9.25 185.00 0.00 6 7 8 9 10 1. Suppose a loan of r dollars carries a monthly interest rate of r, and is to be paid off in n months. The monthly payment p is given by r(1+r)" p= = 1 (1+r)" -1) A portion of each monthly payment goes toward repaying that month's accrued inter- est, while the remainder reduces the amount owing the principal). Write a Fortran program to print an amortization table, which displays the current balance, the pay- ment, the monthly interest amount, and the amount of the payment applied to the principal, for each month. Test your code for several examples of loan amount (1), interest rate (r), and loan period (n). Sample input/output: Enter the amount of the loan 1500 Enter the interest rate .05 Enter the time (in months) 10 Month 0 1 2 3 4 5 Payment Interest Principal Balance 1500.00 194.26 75.00 119.26 1380.74 194.26 69.04 125.22 1255.52 194.26 62.78 131.48 1124.04 194.26 56.20 138.05 985.99 194.26 49.30 144.96 841.03 194.26 42.05 152.21 688.82 194.26 34.44 159.82 529.01 194.26 26.45 167.81 361.20 194.26 18.06 176.20 185.00 194.25 9.25 185.00 0.00 6 7 8 9 10