home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / progm / elem-c.zip / PYMT.C < prev    next >
Text File  |  1985-05-18  |  768b  |  35 lines
  1. /*
  2. **            determine payment if balance and rate and term is known
  3.  
  4.  
  5. *amount = starting balance
  6. *balance = remaining balance
  7. *rate = interest rate per period
  8. *rate1 = interest rate per year
  9. *payment = monthly payment
  10. *principal = payment to principle
  11. *interest = payment of interest per period
  12. *number = number of payments
  13.   
  14. *   payment=Balance/((1-(1+rate)^-Number)/rate)
  15. */
  16.  
  17.     float amount;    /*  declare external veriables   */
  18.     float rate;
  19.     float payment;
  20.     float rate1;
  21.  
  22. #include "math.h"    /*    include declaration for pow()    */
  23.     pymt()    
  24. {
  25.     float number;    
  26.  
  27.     printf("How many payments ? ");
  28.     scanf("%f",&number);
  29.  
  30.  
  31.     payment = amount / ((1 - pow((1. + rate),-number))/rate);
  32.  
  33.  
  34. }