ayudenme pleas

[email protected]
09 de Abril del 2006
hola como se siente usted?
este programa es para el lunes 10/04/06 examen final y no encuentro como empezar este

usted me podria ayudar hacer un programa en lenguaje de programacion en c++ que realize

una tabal de amortizacion sobre saldo insoluto

el profesor me dio la siguiente formula para que me guies:

R=P[ i/1-(1+i) elevado a las -n]






porfavor cualquier cosa reenviemelo por aca este es mi corre electronico


bye y muchisimas gracias

ISAIAS DUQUE GOMEZ
09 de Abril del 2006
//[email protected]
//FINAL FINANZAS

#include<conio.h>
#include<ctype.h>
#include<dos.h>
#include<math.h>
#include<stdio.h>
#include<string.h>
#include<stdlib.h>

#define ESC 27


//PROTOTIPO DE FUNCION

//AMORTIZACIONES BANCARIAS
void a_bancarias();
double funcion(double interes,double meses);
void centra(char *texto,int fila);

//FUNCION PRINCIPAL

void main()
{
char tecla;
do
{
clrscr();
centra("APLICACIONES FINANCIERAS",14);
gotoxy(20,17);printf("Amortizaciones Bancarias..............1");
gotoxy(20,19);printf("Amortizaciones Comerciales............2");
gotoxy(20,21);printf("Ventas A Plazos.......................3");
gotoxy(20,23);printf("MaxiMin...............................4");
gotoxy(20,25);printf("Razones Financieras...................5");
gotoxy(20,27);printf("Balance General.......................6");
gotoxy(20,29);printf("Estado Financiero.....................7");
gotoxy(20,31);printf("Salir.................................8");
gotoxy(20,34);printf("Opcion...............................[ ]\b\b");
tecla=getche();
switch(tecla)
{
case \'1\': a_bancarias(); break;
}
}
while(tecla!=\'8\');
}
/*********************************************************************/
//AMORTIZACIONES BANCARIAS

void a_bancarias()
{
double interes,amort,s,sp,si,A[36],B[36],x,saldo;
double cap,mes,por;
char tecla,cad[2]="%";
int y=9;
do
{
interes=0;amort=0;s=0;sp=0;si=0;por=0;
cap=0;saldo=0;mes=0;x=0;y=0,tecla=0;
clrscr();
centra("AMORTIZACIONES BANCARIAS",18);
gotoxy(23,23);printf("Capital: ");
scanf("%lf",&cap);
gotoxy(23,25);printf("Intereses: ");
scanf("%lf",&por);gotoxy(40,25);printf("%s",cad);
gotoxy(23,27);printf("Meses: ");
scanf("%lf",&mes);
clrscr();
gotoxy(71,5);printf("ESC=Salir");
gotoxy((80-33)/2,5);printf("TABLA DE AMORTIZACIONES BANCARIAS");
gotoxy(3,7);printf("NO. MES"); gotoxy(14,7);printf("PAGO MENSUAL");
gotoxy(33,7);printf("INTERES");gotoxy(48,7);printf("AMORTIZACION");
gotoxy(65,7);printf("SALDO");
y=9;
saldo=cap;
for(x=0;x<mes;x++)
{
gotoxy(62,y);printf("$ %.2lf",cap); //saldo
_setcursortype(0);
B[x]=(saldo*(por/100))/funcion((por/100)*100,mes); //pago mensual
A[interes]=cap*(por/100); //interes mensual
amort=B[x]-A[interes]; //amortizacion mensual
cap=cap-amort; //saldo mensual
gotoxy(6,y);printf("%.0lf",x+1); //contador
gotoxy(14,y);printf("$ %.2lf",B[x]); //pago mensual
gotoxy(31,y);printf("$ %.2lf",A[interes]); //interes
gotoxy(48,y);printf("$ %.2lf",amort); //amortizacion
s+=amort;
sp+=B[x];
si+=A[interes];
y+=1;
delay(150);
}
gotoxy(5,y+1);printf("TOTAL");
gotoxy(62,y+1);printf("TIR");
gotoxy(31,y+1);printf("$ %.2lf",si); //suma interes
gotoxy(14,y+1);printf("$ %.2lf",sp); //suma pagos
gotoxy(48,y+1);printf("$ %.2lf",s); //suma amortizaciones
gotoxy(67,y+1);printf("%.2lf %s",(si/saldo),cad); //TIR
tecla=getch();
}
while(tecla!=ESC);
}
/*******************************************************************/
//FUNCIONES
//AMORTIZACIONES BANCARIAS

double funcion(double interes,double meses)
{
return 1-(pow((1+interes/100),(meses*-1)));
}
/*******************************************************************/

void centra(char *txt,int fila)
{
gotoxy((80-strlen(txt))/2,fila);printf("%s",txt);
}