/* atk1 h5t3 -- koron lasku */

#include <stdio.h>

/* funktioiden prototyypit */
double account(double, double, int);

main()
{
	/* cap_i on alkupääoma, cap_f loppupääoma, interest
	on korkoprosentti ja years talletusaika vuosina */
	double cap_i=13200, cap_f, interest=1.2;
	int years=15;

	/* lasketaan loppupääoma */
	cap_f=account(cap_i, interest, years);

	printf("Jos %.2lf euroa on %d vuotta tilillä,\n",cap_i,years);
	printf("joka kasvaa korkoa %.2lf %%:n vauhdilla,\n",interest);
	printf("niin talletuksen lopuksi rahaa on %.2lf euroa.\n",cap_f);
}

/* c0 on pääoma, i korkoprosentti, y talletusaika vuosina 
funktio account laskee pääoman y vuoden kuluttua */
double account(double c, double i, int y)
{
	int k;

	for(k=1;k<=y;k++)
		/* vuodessa pääoma kasvaa tekijällä
		(1 + korkoprosentti/100) */
		c *= (1+i/100.0);
	
	/* nyt muuttujassa c on loppupääoma y vuoden talletuksen
	jälkeen */
	return c;
}