-
Lenguaje
Pascal
-
Descripción
Calcular el interés compuesto generado por un capital depositado durante cierta cantidad de tiempo a una tasa de interés determinada, aplique las siguientes fórmulas:
M = [(1+r%)] ^ t*c
I = M - C
Monto (M): Es la suma del capital más sus intereses producido en determinado tiempo.
Tasa de interés (r%): Es la ganancia que se obtiene por cada 100 unidades monetarias en cada periodo de tiempo.
Capital (C): Es todo aquello que se va a ceder o imponer durante algún tiempo para generar ganancia.
Interés (I): Parte de la utilidad que obtiene el capitalista prestar su dinero.
Tiempo (t): Es el periodo de tiempo durante el cual se cede el capital.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
program InteresCompuesto;
uses crt, math;
var capital_depositado, interes_compuesto, monto, tasa_de_interes, tiempo : real;
begin
write ('Ingresa el valor de capital depositado: ');
readln (capital_depositado);
write ('Ingresa el valor de tasa de interes: ');
readln (tasa_de_interes);
write ('Ingresa el valor de tiempo: ');
readln (tiempo);
monto := power(1.0+tasa_de_interes/100,tiempo)*capital_depositado;
interes_compuesto := monto-capital_depositado;
writeln ('Valor de interes compuesto: ', interes_compuesto:0:6);
writeln ('Valor de monto: ', monto:0:6);
writeln;
write ('Presiona una tecla para terminar . . . ');
readkey;
end.
uses crt, math;
var capital_depositado, interes_compuesto, monto, tasa_de_interes, tiempo : real;
begin
write ('Ingresa el valor de capital depositado: ');
readln (capital_depositado);
write ('Ingresa el valor de tasa de interes: ');
readln (tasa_de_interes);
write ('Ingresa el valor de tiempo: ');
readln (tiempo);
monto := power(1.0+tasa_de_interes/100,tiempo)*capital_depositado;
interes_compuesto := monto-capital_depositado;
writeln ('Valor de interes compuesto: ', interes_compuesto:0:6);
writeln ('Valor de monto: ', monto:0:6);
writeln;
write ('Presiona una tecla para terminar . . . ');
readkey;
end.