10
INPUT
"Principle: `"
P
"Years: "
Y
"APR: "
R:N=Y*12:R=R/(1200):M=P*(R/(1-(1+R)^-N)):A%=@%:@%=&20200:
PRINT
'
"Annual repayment: `"
M*12'
"Monthly repayment: `"
M'
"Total repayment: `"
M*N:@%=A%
Download Mortgage1
BBC BASIC detokeniser and syntax highlighter by Ben Ryves.