#include <stdio.h>
#include <math.h>

double atof();
double pow();

main(argc, argv)
int argc;
char *argv[];
{
char tmp[200];
double prin = 0;
double monpay = 0;
double interest = 0;
double length = 0;

if ((argc == 2) && ((argv[1][0] == 'p') || (argv[1][0] == 'P')))
	{
	 fprintf(stdout,"Enter monthly payment <$>......... ");
	 fgets(tmp,100,stdin);
	 monpay = atof(tmp);
	 fprintf(stdout,"Enter length of loan <months>..... ");
	 fgets(tmp,100,stdin);
	 length = atof(tmp);
	 fprintf(stdout,"Enter annual interest rate........ ");
	 fgets(tmp,100,stdin);
	 interest = atof(tmp) / 100;
	 fprintf(stdout,"\n");
	}
else if ((argc == 2) && ((argv[1][0] == 'v') || (argv[1][0] == 'V')))
	{
	 fprintf(stdout,"loanamt: Version 1.00 \n");
	 fprintf(stdout,"         Copyright 1987 by Michael Brochstein\n");
	 fprintf(stdout,"         All rights reserved.\n");
	}
else if (argc != 4) 
	{
	 fprintf(stderr,"Usage: loanamt p \n");
	 fprintf(stderr,"       loanamt v \n");
	 fprintf(stderr,"       loanamt <monthly payment> <length of loan ");
	 fprintf(stderr,"(months)>\n");
	 fprintf(stderr,"               <annual interest rate>\n");
	}
else if (argc == 4)
	{
	 monpay = atof(argv[1]);
	 length = atof(argv[2]);
	 interest = atof(argv[3]) / 100;
	}

if ((argc == 4) 
	|| ((argc == 2) && ((argv[1][0] == 'p') || (argv[1][0] == 'P'))))
	{
	 prin = 1 / pow((1 + (interest/12)),length);
	 prin = 1 - prin;
	 prin = (prin / (interest/12)) * monpay;
	 fprintf(stdout,"Amount that can be borrowed...... %.2f\n", prin);
	}
}