ij˜ªZ3¤Z2¤E¤ÐÂÍÙÉMÉNÆYÒAÔIÔAÙIÙËÑÁIÐE1¤V¤A2¤U¤P¤M¤Y¤I¤NÙÒÓÔA¤Q¤R¤S¤T¤ÕÖ×ØQ±X¤R±S±T±U±ÚÇUÉÈLIST110°LIST20°ÏSP¤€€€ €€€€€€€€€€ €!€"€#$%&'(€)*+,-./01234€5************************›* MORTGAGE / A **›************************› +11;@,€;@,‚;@,“;@,&&”;@,•;@P,µ;A,~~Ÿ;@P,©;@P,–;@, ;@,¡;@,¢;@,£;@,—;@,˜;@,š;@,™;@, 606©.& 66µ.© &&  ÍÏÒÔÇÁÇÅ ÁÍÏÒÔÉÚÁÔÉÏÎ '' THIS PROGRAM WILL PRINT A TABLE#++ #DESCRIBING MOTGAGE REPAYMENT. INPUT(** "IS THE MORTGAGE PRINCIPAL, MONTHLY-** "PAYMENT, TERM IN YEARS, AND ANNUAL2 INTEREST RATE.7** "OUTPUT INCLUDES, FOR EACH PAYMENT,<,, $AMOUNT AMORTIZED, AMOUNT OF INTERESTF%% AND BALANCE LEFT ON MORTGAGE.Z [2. %IS DELAY AFTER EACH YEAR DESIRED(Y/N)2€\€0Y*€0N@‘]0, #IS LINE PRINTER OUTPUT DESIRED(Y/N)0^0Y*0N@“_)% ENTER ANY CHARACTER TO BEGIN)‚d }n6 A( MORTGAGE PRINCIPAL = ,ƒ6 Bs 6„-ƒx6 A ( MONTHLY PAYMENT = ,…6 B‚6 A0( TERM OF MORTGAGE = ,†6 BŒ6 A@( ANNUAL INT. RATE(%)= ,‡6 B–)6ˆ-‡'A)MONTHLY INTEREST RATE›È6‰-@$†Í'6Š-6‹-'6Œ-Ò6‰!@A6SEE IF MORE THAN 1 YEAR LEFT›Ü6-6Ž-á ›’‘„æ Aë-@‰&@ð Aú 6‰- A1(6±-P:+‘%’%>P,$A,'A16–.=:±, A% FINAL PAYMENT = –" 4Y"3FINAL PAYMENT = ',FIND RESULTS FOR 1 YEAR›1 A36-6Ž-6-@@@ AJ T6‰-‰&@Y6Š-Š%@^ Ac€4NAh1- $ENTER ANY CHARACTER FOR ANOTHER YEAR1“r AèPAGE HEADING SUBROUTINE›é 6”.%ï--6•.# NO. INTEREST AMORTIZED BALANCE ò +ü?&6ƒ-P:+ƒ%>P,$A,'A/6–.=:ƒ,9 A%?6—.–ý?&6…-P:+…%>P,$A,'A/6–.=:…,9 A%?6˜.–þ?&6†-P:+†%>P,$A,'A/6–.=:†,9 A%?6™.–ÿ?&6‡-P:+‡%>P,$A,'A/6–.=:‡,9 A%?6š.–I" PRIN. = — PAYMENT = ˜F TERM = † YEARS RATE = š”I * 4Y*3PRIN. = — PAYMENT = ˜0 4Y03TERM = † YEARS RATE = š” •4Y3•3  $L--PRINTING SUBROUTINE FOR MONTHLY PAYMENT›V% 6-›6œ-’6-‘6ž-„% A X Ÿ[ 4Y3Ÿ`$°COMPUTATION SUBROUTINE›Â 6›-Ä3 6’-„$ˆ6‘-…&’6„-„&‘#6‹-‹%‘+6Œ-Œ%’36Ž-Ž%’É 6-%‘ʉ"6‘-ƒ&‹&œË‰"6„-´Î AØ$END OF YEAR SUBROUTINE›I&6Ž-P:+Ž%>P,$A,'AI6-P:+%>P,$A,'A# 6 .=:Š,6¡.=:Ž,6¢.=:,$1 6£. 6¤-@%6¥-@16¦-@ % A @( YR.=Ÿ- 4Y3YR.= Ÿ.6¥-@6¦-@$/6¤-@0 4Y332$ÐPRINTUSING SUBROUTINE›Õ36¤-@6¥-@'6¦-@$36§-@5Úl&6œ-P:+œ%>P,$A,'AI6-P:+%>P,$A,'Al6ž-P:+ž%>P,$A,'Aä' 6 .=:,6¢.=:,6¡.=:œ,'6£.=:ž,î 6–.£ A%6£.–ø/ 6–.¡ A%6¡.–6–.¢) A%/6¢.–ü 6¨-B: ,¨"¤ 6¤-¤%@ý$$6 7B: ,%@,.µ7@<¤&¨,þ¨"¤%@6¤-¤&@8#6Ÿ7@<¤&¨,.©7@<¤&¨,86Ÿ7¤&¨%@<¤,.  6ª-B:¡,$$6¡7B:¡,%@,.µ7@<¥&ª,' 6†-¥&ª† ¤%@'6†-¤%@ I#6Ÿ7¤%@<†,.©7¤%@<†,I6Ÿ7†%@<¥,.¡7@<ª&@, 6«-B:¢,$$6¢7B:¢,%@,.µ7@<¦&«,<'6Ÿ7¥%@<¦&«,.©7¥%@<¦&«,<6Ÿ7¦&«%@<¦,.¢ 6¬-B:£,$$6£7B:£,%@,.µ7@<§&¬, <'6Ÿ7¦%@<§&¬,.©7¦%@<§&¬,<6Ÿ7§&¬%@<§,.£*$Ä ++SUBROUTINE TO PUT 0'S IN RIGHT PLACES›Î 6­-B:–,Ø ®-@­â –7®<®,4.A&ì  ®ö ""6–7­%@<­%@,..00 $( ­"®%@A%`2 6–7­%@<­%@,.0F A%`€ D:MORTGAGE