Fórum Como fazer calculo de juros composto no delphi #342184
22/05/2007
0
Olá pessoal será que alguem poderia me passar uma função que calcule juros composto ou ou me explica como que eu resolvo essa equação com um exemplo.
´Fomula do juros composto é essa :
M = C(i +1)t
M = montante
C = capital
i = juros
t = tempo
Desde já agradeço a todos que me ajudarem.
´Fomula do juros composto é essa :
M = C(i +1)t
M = montante
C = capital
i = juros
t = tempo
Desde já agradeço a todos que me ajudarem.
Ivespas
Curtir tópico
+ 0
Responder
Posts
22/05/2007
Edilcimar
M= C * power(1 + t)
Responder
Gostei + 0
09/06/2007
Khundalini
Tá na mão a ´receita do bolo´:
program CalculoJurosCompostos;
{$APPTYPE CONSOLE}
{.$DEFINE USEMATH}
{$IFDEF USEMATH}
uses
Math;
{$ENDIF}
var
M, C, i, t: Extended;
begin
C := 10000.00; // Investimento = R$ 10.000,00
i := 0.05; // Taxa = 5¬ a.a.
t := 10; // Período = 10 anos
{$IFDEF USEMATH}
M := C * Power(1 + i, t);
{$ELSE}
M := C * Exp(t * Ln(1 + i));
{$ENDIF}
WriteLn(´Capital = ´, C:15:2);
WriteLn(´Taxa = ´, i * 100:5:2, ´¬ a.a.´);
WriteLn(´Período = ´, t:3:0, ´ anos´);
WriteLn(´Montante = ´, M:15:2);
WriteLn(Eoln);
end.
Consulte tb sobre a função Payment da unit Math.
Sds.
program CalculoJurosCompostos;
{$APPTYPE CONSOLE}
{.$DEFINE USEMATH}
{$IFDEF USEMATH}
uses
Math;
{$ENDIF}
var
M, C, i, t: Extended;
begin
C := 10000.00; // Investimento = R$ 10.000,00
i := 0.05; // Taxa = 5¬ a.a.
t := 10; // Período = 10 anos
{$IFDEF USEMATH}
M := C * Power(1 + i, t);
{$ELSE}
M := C * Exp(t * Ln(1 + i));
{$ENDIF}
WriteLn(´Capital = ´, C:15:2);
WriteLn(´Taxa = ´, i * 100:5:2, ´¬ a.a.´);
WriteLn(´Período = ´, t:3:0, ´ anos´);
WriteLn(´Montante = ´, M:15:2);
WriteLn(Eoln);
end.
Consulte tb sobre a função Payment da unit Math.
Sds.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)