Directory of image this file is from
This file as a plain text file
CP()0J HSC-PS/8 FOCAL, 1971?MD7BE?MB.B"A "PRINCIPAL: ",PR,!"INTEREST RATE: ",IN?MCBA !"TERM (IN MONTHS): ",TE,!!?MF9B(S D=1+((IN/12)*.01)?MCTB*S C=PR/B?MC[B2S BA=PR?MI>JBT "PRINCIPAL:",%7.02,PR,:30"PAYMENTS",C,!!!?MGHLAF M=1,TERM;D 7?MDKNAS CI=BA*(IN/12)* 01?MDSNBS TO=TO+CI?MD-NCS CP=C-CI;S BA=BA-CP;T %7,M,%14.02,CI,CP,BA,!?M S B=B+(1/D^A)?MEWBFC THIS PROGRAM WILL COMPUTE MONTHLY PAYMENTS AND THE ?ME7BGC CONTRIBUTION OF EACH PAYMENT TO INTEREST AND PRINCIPAL.?MFWBHC YOU WILL BE ASKED THE AMOUNT OF THE PRINCIPAL, THE RATE?MG"BIC OF THE INTEREST, AND THE TERM OF THE LOAN, WH CH IS IN?MGDBL?MCMB)F A=1,TE;D 15.99?MBWB!E?MC>LBT !!!,:20,"TOTAL INTEREST",%6.02,TO,!!!;G 1.33?MHABJC MONTHS. THE PROGRAM WILL THEN OUTPUT A TABLE SHOWING?MF6BKC THE PROGRESSION OF THE LOAN.?MISBAC INTRST FROM FOCAL PROGRAMMING MANUAL PDP-15 SYSTE S?MI.BCC REPRINTED BY PERMISSION OF DIGITAL EQUIPMENT CORP.?MH4BBC COPYRIGHT 1970 BY DIGITAL EQUPMENT CORP.?MBTBDC LAST CHANGE: 8/9/71?MC4JET :5,"PAYMENT",:17,"INTEREST",:32,"PRINCIPAL",:50,"BALANCE",!?M L D INTRST;L S INTRST;L R CHISQR?M?M" RINCIPAL",:50,"BALANCE",!?RTING LOCATION: 1.34?MH?H?H?H?H?H?H?H?H?H?H?H?H?H?H?H?H?H?H?H?F M=1,TERM;D 7?MF;LBT !!!,:20,"TOTAL INTEREST",%6.02,TO,!!!;G 1.7TCY*I>I3C3A7LR 3YOPT7L2J*I+MCP7IR 3YOPT V6/KP3EWS3RWV* C3CGHR6)2JC3K[N.,BI*I>I3CWH+CCK3ASN2 WR7SSE6 WN MWB3RZ 3L A"M&J7I+S2 [NL7G6JNI+KCP3CGL*I>I/A+C*=B0+ICF+NCO3N7U7BKE"M&J7I+S2 C3K[N6IN/+KCP7RSE3U;R2 [I6 WN3MWBR*M2I7J3P& 2 C3K[N2MNJ3T L*=:I2MNJ Note: Lines longer than 256 characters were wrapped