• Lenguaje

    Pascal

  • Descripción

    Una persona deposita en el banco cierta cantidad de dinero, donde le reconocen un interés del 2% mensual, capitalizado mensualmente. ¿Cual será el saldo al cabo de 5 años?
    Fórmula a utilizar:
    valor futuro = valor presente * (1 + interes ) ^ meses
    Se requiere desarrollar un algoritmo que le permita conocer a una persona ¿cual será el saldo al cabo de 5 años? si deposita cierta cantidad de dinero.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
program InteresDel2Mensual;
uses crt, math;

var deposito, interes, meses, saldo : real;
begin
    write ('Ingresa el valor de deposito: ');
    readln (deposito);
    interes := 0.02;
    meses := 12*5;
    saldo := deposito*power(1.0+interes,meses);
    writeln ('Valor de interes: ', interes:0:6);
    writeln ('Valor de meses: ', meses:0:6);
    writeln ('Valor de saldo: ', saldo:0:6);
    writeln;
    write ('Presiona una tecla para terminar . . . ');
    readkey;
end.