//Grace Thummel		CS1A Practice Practicum		    chapter 5, p. 296 #16
//
/************************************************************************
*																		*
* Calculate Savings Account Balance										*
*_______________________________________________________________________*
* This program calculates the total balance in a savings account after	*
* a given period of time. It takes into account the monthly deposits,	*
* the monthly withdrawls, and the interest earned after each month.		*
*																		*
* Calculation is based on the formulas:									*
* 	monthly_interest = (total_balance + monthly_deposit -				*
*						monthly_withdrawl) * monthly_interest_rate;		*
	monthly_balance = monthly_deposit - monthly_withdrawl + 			*
					  monthly_interest;									*
	total_balance += monthly_balance;									*
	total_interest += monthly_interest;									*
*_______________________________________________________________________*
* INPUT																	*
*	annual_interest_percent	: Percentage of annual interest				*			
*	starting_balance		: Starting balance in the account			*
*	months					: Number of months since account was opened	*
*	monthly_deposit			: Amount deposited in a month				*
*	float monthly_withdrawl	: Amount withdrawn in a month				*
*																		*
* OUTPUT																*
*	total_deposit		: Total amount deposited from all the months	*
*	total_withdrawl		: Total amount deposited from all the months	*
*	total_balance		: Total balance at the end of the time period	*
*	total_interest		: Total earned from interest					*
*																		*
************************************************************************/
#include <iostream>
#include <iomanip>
using namespace std;
 
int main ()
{
	// Initialize Variables
	float annual_interest_percent;	// Input - Percentage of annual interest
	float annual_interest_rate;		// Annual interest rate as a decimal
	float monthly_interest_rate;	// Interest rate per month, annual_interest_rate / 12
	float starting_balance;			// Input - Starting balance in the account
	int months;						// Input - Number of months since account was established
	float monthly_balance;			// Amount added to the total balance per month
	float monthly_interest;		// Interest earned in one month
	float monthly_deposit;		// Input - Amount deposited in a month
	float monthly_withdrawl;	// Input - Amount withdrawn in a month
	float total_deposit = 0;	// Output/Accumulator - Total amount deposited from all the months
	float total_withdrawl = 0;	// Output/Accumulator - Total amount deposited from all the months
	float total_balance = 0;	// Output/Accumulator - Total balance at the end of the time period given
	float total_interest = 0;	// Output/Accumulator - Total earned from interest
 
 
	// Get Inputs
	cout << "What is the annual interest rate as a percentage?" << endl;
	cin >> annual_interest_percent;
	cout << "What was the starting balance?" << endl;
	cin >> starting_balance;
	cout << "How many months have passed since the account was established?" << endl;
	cin >> months;
 
	annual_interest_rate = annual_interest_percent / 100;
	monthly_interest_rate = annual_interest_rate / 12;
 
	total_balance = starting_balance;
 
	// Monthly Loop
	for (int i = 1; i <= months; i++)
	{
		cout << "How much was deposited month " << i << "?" << endl;
		cin >> monthly_deposit;
		while (monthly_deposit < 0)
		{
			cout << "You cannot enter a negative numder for the amount deposited." << endl;
			cout << "How much was deposited month " << i << "?" << endl;
			cin >> monthly_deposit;
		}
		total_deposit += monthly_deposit;
 
		cout << "How much was withdrawn month " << i << "?" << endl;
		cin >> monthly_withdrawl;
		while (monthly_withdrawl < 0)
		{
			cout << "You cannot enter a negative numder for the amount withdrawn." << endl;
			cout << "How much was withdrawn month" << i << "?" << endl;
			cin >> monthly_withdrawl;
		}
		total_withdrawl += monthly_withdrawl;
 
		// Calculate Accumulators
		monthly_interest = (total_balance + monthly_deposit - monthly_withdrawl) * monthly_interest_rate;
		monthly_balance = monthly_deposit - monthly_withdrawl + monthly_interest;
		total_balance += monthly_balance;
		total_interest += monthly_interest;
	}
 
 
	// Display Outputs
	cout << fixed << setprecision(2);
	cout << "The ending balance after " << months << " months is $"
		 << total_balance << endl;
	cout << "The total amount deposited is $" << total_deposit << endl;
	cout << "The total amount withdrawn is $" << total_withdrawl << endl;
	cout << "The total amount of interest earned is $" << total_interest << endl;
}

Ly9HcmFjZSBUaHVtbWVsCQlDUzFBIFByYWN0aWNlIFByYWN0aWN1bQkJICAgIGNoYXB0ZXIgNSwgcC4gMjk2ICMxNgovLwovKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqCioJCQkJCQkJCQkJCQkJCQkJCQkqCiogQ2FsY3VsYXRlIFNhdmluZ3MgQWNjb3VudCBCYWxhbmNlCQkJCQkJCQkJCSoKKl9fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fKgoqIFRoaXMgcHJvZ3JhbSBjYWxjdWxhdGVzIHRoZSB0b3RhbCBiYWxhbmNlIGluIGEgc2F2aW5ncyBhY2NvdW50IGFmdGVyCSoKKiBhIGdpdmVuIHBlcmlvZCBvZiB0aW1lLiBJdCB0YWtlcyBpbnRvIGFjY291bnQgdGhlIG1vbnRobHkgZGVwb3NpdHMsCSoKKiB0aGUgbW9udGhseSB3aXRoZHJhd2xzLCBhbmQgdGhlIGludGVyZXN0IGVhcm5lZCBhZnRlciBlYWNoIG1vbnRoLgkJKgoqCQkJCQkJCQkJCQkJCQkJCQkJKgoqIENhbGN1bGF0aW9uIGlzIGJhc2VkIG9uIHRoZSBmb3JtdWxhczoJCQkJCQkJCQkqCiogCW1vbnRobHlfaW50ZXJlc3QgPSAodG90YWxfYmFsYW5jZSArIG1vbnRobHlfZGVwb3NpdCAtCQkJCSoKKgkJCQkJCW1vbnRobHlfd2l0aGRyYXdsKSAqIG1vbnRobHlfaW50ZXJlc3RfcmF0ZTsJCSoKCW1vbnRobHlfYmFsYW5jZSA9IG1vbnRobHlfZGVwb3NpdCAtIG1vbnRobHlfd2l0aGRyYXdsICsgCQkJKgoJCQkJCSAgbW9udGhseV9pbnRlcmVzdDsJCQkJCQkJCQkqCgl0b3RhbF9iYWxhbmNlICs9IG1vbnRobHlfYmFsYW5jZTsJCQkJCQkJCQkqCgl0b3RhbF9pbnRlcmVzdCArPSBtb250aGx5X2ludGVyZXN0OwkJCQkJCQkJCSoKKl9fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fKgoqIElOUFVUCQkJCQkJCQkJCQkJCQkJCQkqCioJYW5udWFsX2ludGVyZXN0X3BlcmNlbnQJOiBQZXJjZW50YWdlIG9mIGFubnVhbCBpbnRlcmVzdAkJCQkqCQkJCioJc3RhcnRpbmdfYmFsYW5jZQkJOiBTdGFydGluZyBiYWxhbmNlIGluIHRoZSBhY2NvdW50CQkJKgoqCW1vbnRocwkJCQkJOiBOdW1iZXIgb2YgbW9udGhzIHNpbmNlIGFjY291bnQgd2FzIG9wZW5lZAkqCioJbW9udGhseV9kZXBvc2l0CQkJOiBBbW91bnQgZGVwb3NpdGVkIGluIGEgbW9udGgJCQkJKgoqCWZsb2F0IG1vbnRobHlfd2l0aGRyYXdsCTogQW1vdW50IHdpdGhkcmF3biBpbiBhIG1vbnRoCQkJCSoKKgkJCQkJCQkJCQkJCQkJCQkJCSoKKiBPVVRQVVQJCQkJCQkJCQkJCQkJCQkJKgoqCXRvdGFsX2RlcG9zaXQJCTogVG90YWwgYW1vdW50IGRlcG9zaXRlZCBmcm9tIGFsbCB0aGUgbW9udGhzCSoKKgl0b3RhbF93aXRoZHJhd2wJCTogVG90YWwgYW1vdW50IGRlcG9zaXRlZCBmcm9tIGFsbCB0aGUgbW9udGhzCSoKKgl0b3RhbF9iYWxhbmNlCQk6IFRvdGFsIGJhbGFuY2UgYXQgdGhlIGVuZCBvZiB0aGUgdGltZSBwZXJpb2QJKgoqCXRvdGFsX2ludGVyZXN0CQk6IFRvdGFsIGVhcm5lZCBmcm9tIGludGVyZXN0CQkJCQkqCioJCQkJCQkJCQkJCQkJCQkJCQkqCioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKi8KI2luY2x1ZGUgPGlvc3RyZWFtPgojaW5jbHVkZSA8aW9tYW5pcD4KdXNpbmcgbmFtZXNwYWNlIHN0ZDsKCmludCBtYWluICgpCnsKCS8vIEluaXRpYWxpemUgVmFyaWFibGVzCglmbG9hdCBhbm51YWxfaW50ZXJlc3RfcGVyY2VudDsJLy8gSW5wdXQgLSBQZXJjZW50YWdlIG9mIGFubnVhbCBpbnRlcmVzdAoJZmxvYXQgYW5udWFsX2ludGVyZXN0X3JhdGU7CQkvLyBBbm51YWwgaW50ZXJlc3QgcmF0ZSBhcyBhIGRlY2ltYWwKCWZsb2F0IG1vbnRobHlfaW50ZXJlc3RfcmF0ZTsJLy8gSW50ZXJlc3QgcmF0ZSBwZXIgbW9udGgsIGFubnVhbF9pbnRlcmVzdF9yYXRlIC8gMTIKCWZsb2F0IHN0YXJ0aW5nX2JhbGFuY2U7CQkJLy8gSW5wdXQgLSBTdGFydGluZyBiYWxhbmNlIGluIHRoZSBhY2NvdW50CglpbnQgbW9udGhzOwkJCQkJCS8vIElucHV0IC0gTnVtYmVyIG9mIG1vbnRocyBzaW5jZSBhY2NvdW50IHdhcyBlc3RhYmxpc2hlZAoJZmxvYXQgbW9udGhseV9iYWxhbmNlOwkJCS8vIEFtb3VudCBhZGRlZCB0byB0aGUgdG90YWwgYmFsYW5jZSBwZXIgbW9udGgKCWZsb2F0IG1vbnRobHlfaW50ZXJlc3Q7CQkvLyBJbnRlcmVzdCBlYXJuZWQgaW4gb25lIG1vbnRoCglmbG9hdCBtb250aGx5X2RlcG9zaXQ7CQkvLyBJbnB1dCAtIEFtb3VudCBkZXBvc2l0ZWQgaW4gYSBtb250aAoJZmxvYXQgbW9udGhseV93aXRoZHJhd2w7CS8vIElucHV0IC0gQW1vdW50IHdpdGhkcmF3biBpbiBhIG1vbnRoCglmbG9hdCB0b3RhbF9kZXBvc2l0ID0gMDsJLy8gT3V0cHV0L0FjY3VtdWxhdG9yIC0gVG90YWwgYW1vdW50IGRlcG9zaXRlZCBmcm9tIGFsbCB0aGUgbW9udGhzCglmbG9hdCB0b3RhbF93aXRoZHJhd2wgPSAwOwkvLyBPdXRwdXQvQWNjdW11bGF0b3IgLSBUb3RhbCBhbW91bnQgZGVwb3NpdGVkIGZyb20gYWxsIHRoZSBtb250aHMKCWZsb2F0IHRvdGFsX2JhbGFuY2UgPSAwOwkvLyBPdXRwdXQvQWNjdW11bGF0b3IgLSBUb3RhbCBiYWxhbmNlIGF0IHRoZSBlbmQgb2YgdGhlIHRpbWUgcGVyaW9kIGdpdmVuCglmbG9hdCB0b3RhbF9pbnRlcmVzdCA9IDA7CS8vIE91dHB1dC9BY2N1bXVsYXRvciAtIFRvdGFsIGVhcm5lZCBmcm9tIGludGVyZXN0CgoJCgkvLyBHZXQgSW5wdXRzCgljb3V0IDw8ICJXaGF0IGlzIHRoZSBhbm51YWwgaW50ZXJlc3QgcmF0ZSBhcyBhIHBlcmNlbnRhZ2U/IiA8PCBlbmRsOwoJY2luID4+IGFubnVhbF9pbnRlcmVzdF9wZXJjZW50OwoJY291dCA8PCAiV2hhdCB3YXMgdGhlIHN0YXJ0aW5nIGJhbGFuY2U/IiA8PCBlbmRsOwoJY2luID4+IHN0YXJ0aW5nX2JhbGFuY2U7Cgljb3V0IDw8ICJIb3cgbWFueSBtb250aHMgaGF2ZSBwYXNzZWQgc2luY2UgdGhlIGFjY291bnQgd2FzIGVzdGFibGlzaGVkPyIgPDwgZW5kbDsKCWNpbiA+PiBtb250aHM7CgkKCWFubnVhbF9pbnRlcmVzdF9yYXRlID0gYW5udWFsX2ludGVyZXN0X3BlcmNlbnQgLyAxMDA7Cgltb250aGx5X2ludGVyZXN0X3JhdGUgPSBhbm51YWxfaW50ZXJlc3RfcmF0ZSAvIDEyOwoKCXRvdGFsX2JhbGFuY2UgPSBzdGFydGluZ19iYWxhbmNlOwoJCgkvLyBNb250aGx5IExvb3AKCWZvciAoaW50IGkgPSAxOyBpIDw9IG1vbnRoczsgaSsrKQoJewoJCWNvdXQgPDwgIkhvdyBtdWNoIHdhcyBkZXBvc2l0ZWQgbW9udGggIiA8PCBpIDw8ICI/IiA8PCBlbmRsOwoJCWNpbiA+PiBtb250aGx5X2RlcG9zaXQ7CgkJd2hpbGUgKG1vbnRobHlfZGVwb3NpdCA8IDApCgkJewoJCQljb3V0IDw8ICJZb3UgY2Fubm90IGVudGVyIGEgbmVnYXRpdmUgbnVtZGVyIGZvciB0aGUgYW1vdW50IGRlcG9zaXRlZC4iIDw8IGVuZGw7CgkJCWNvdXQgPDwgIkhvdyBtdWNoIHdhcyBkZXBvc2l0ZWQgbW9udGggIiA8PCBpIDw8ICI/IiA8PCBlbmRsOwoJCQljaW4gPj4gbW9udGhseV9kZXBvc2l0OwoJCX0KCQl0b3RhbF9kZXBvc2l0ICs9IG1vbnRobHlfZGVwb3NpdDsKCQkKCQljb3V0IDw8ICJIb3cgbXVjaCB3YXMgd2l0aGRyYXduIG1vbnRoICIgPDwgaSA8PCAiPyIgPDwgZW5kbDsKCQljaW4gPj4gbW9udGhseV93aXRoZHJhd2w7CgkJd2hpbGUgKG1vbnRobHlfd2l0aGRyYXdsIDwgMCkKCQl7CgkJCWNvdXQgPDwgIllvdSBjYW5ub3QgZW50ZXIgYSBuZWdhdGl2ZSBudW1kZXIgZm9yIHRoZSBhbW91bnQgd2l0aGRyYXduLiIgPDwgZW5kbDsKCQkJY291dCA8PCAiSG93IG11Y2ggd2FzIHdpdGhkcmF3biBtb250aCIgPDwgaSA8PCAiPyIgPDwgZW5kbDsKCQkJY2luID4+IG1vbnRobHlfd2l0aGRyYXdsOwoJCX0KCQl0b3RhbF93aXRoZHJhd2wgKz0gbW9udGhseV93aXRoZHJhd2w7CgkJCgkJLy8gQ2FsY3VsYXRlIEFjY3VtdWxhdG9ycwoJCW1vbnRobHlfaW50ZXJlc3QgPSAodG90YWxfYmFsYW5jZSArIG1vbnRobHlfZGVwb3NpdCAtIG1vbnRobHlfd2l0aGRyYXdsKSAqIG1vbnRobHlfaW50ZXJlc3RfcmF0ZTsKCQltb250aGx5X2JhbGFuY2UgPSBtb250aGx5X2RlcG9zaXQgLSBtb250aGx5X3dpdGhkcmF3bCArIG1vbnRobHlfaW50ZXJlc3Q7CgkJdG90YWxfYmFsYW5jZSArPSBtb250aGx5X2JhbGFuY2U7CgkJdG90YWxfaW50ZXJlc3QgKz0gbW9udGhseV9pbnRlcmVzdDsKCX0KCQoJCgkvLyBEaXNwbGF5IE91dHB1dHMKCWNvdXQgPDwgZml4ZWQgPDwgc2V0cHJlY2lzaW9uKDIpOwoJY291dCA8PCAiVGhlIGVuZGluZyBiYWxhbmNlIGFmdGVyICIgPDwgbW9udGhzIDw8ICIgbW9udGhzIGlzICQiCgkJIDw8IHRvdGFsX2JhbGFuY2UgPDwgZW5kbDsKCWNvdXQgPDwgIlRoZSB0b3RhbCBhbW91bnQgZGVwb3NpdGVkIGlzICQiIDw8IHRvdGFsX2RlcG9zaXQgPDwgZW5kbDsKCWNvdXQgPDwgIlRoZSB0b3RhbCBhbW91bnQgd2l0aGRyYXduIGlzICQiIDw8IHRvdGFsX3dpdGhkcmF3bCA8PCBlbmRsOwoJY291dCA8PCAiVGhlIHRvdGFsIGFtb3VudCBvZiBpbnRlcmVzdCBlYXJuZWQgaXMgJCIgPDwgdG90YWxfaW50ZXJlc3QgPDwgZW5kbDsKfQ==

MTAKMTAwMDAKMzYKLTEwCjUwMAoyMDAKNTAwCjIwMAo1MDAKMjAwCjUwMAoyMDAKNTAwCjIwMAo1MDAKMjAwCjUwMAoyMDAKNTAwCjIwMAo1MDAKMjAwCjUwMAoyMDAKNTAwCjIwMAo1MDAKMjAwCjUwMAoyMDAKNTAwCjIwMAo1MDAKMjAwCjUwMAoyMDAKNTAwCjIwMAo1MDAKMjAwCjUwMAoyMDAKNTAwCjIwMAo1MDAKMjAwCjUwMAoyMDAKNTAwCjIwMAo1MDAKMjAwCjUwMAoyMDAKNTAwCjIwMAo1MDAKMjAwCjUwMAoyMDAKNTAwCjIwMAo1MDAKMjAwCjUwMAoyMDAKNTAwCjIwMAo1MDAKMjAwCjUwMAoyMDAKNTAwCjIwMAo1MDAKMjAwCg==

10
10000
36
-10
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200
500
200