home *** CD-ROM | disk | FTP | other *** search
- 1 enddata
- 2 enddata
-
- 3 end0data
- 4 enddata
- 5 endlet
-
- 15 endrem
- 513 for(NULL)ayment on (NULL)oan
- 1025 on(NULL)o obtain regular payment
- 1281 > to repay a loan, enter
- 1537 > the values in
- 1793 > l2/m2/n2/o2, and then
- 2049 > press '_'.
- 3073 on(NULL)rincipal
- 3074 return;end
-