Calcular juros compostos

Question

PESSOAL VOC�S PODEM ME AJUDAR ?
PRECISO FAZER UM SISTEMA EM DELPHI QUE CALCULE JUROS COMPOSTOS COM 2� AO DIA E 10� AO M�S
ALGU�M PODE ME AJUDE ?

[b:c62c1316d6]T�tulo editado pelo Moderador (AZ)[/b:c62c1316d6]

Aroldo Zanela · Answer

Colega,Se � composto, ou � 2�ad ou 10�am. � pra saber o valor futuro? ou valor de presta��o fixa?Montante (Valor futuro):[code:1:9203c35770]var nMontante: Currency;beginnMontante:=(rxCapital.Value*Power((1+(rxJuros.Value/100)),rxPeriodo.Value));reTexto.Lines.Clear;  reTexto.Lines.Add( �� );  reTexto.Lines.Add( �-----SIMULA��O PARA CALCULAR O MONTANTE -----� );  reTexto.Lines.Add( �� );reTexto.Lines.Add( �Capital/Valor presente = � + FloatToStrF( rxCapital.Value, ffNumber, 15, 2 ) );  reTexto.Lines.Add( �� );  reTexto.Lines.Add( �Taxa de juros = � + FloatToStrF( rxJuros.Value, ffNumber, 15, 2 ) );  reTexto.Lines.Add( �� );  reTexto.Lines.Add( �Per�odos = � + FloatToStrF( rxPeriodo.Value, ffNumber, 15, 2 ) );  reTexto.Lines.Add( �� );  reTexto.Lines.Add( �Montante/Valor Futuro  = � + FloatToStrF( nMontante, ffNumber, 15, 2 ));end;[/code:1:9203c35770]Presta��o fixa com juros compostos:[code:1:9203c35770]var Fator: Currency;begin  Fator:= (1 - Power( 1 + (strtofloat(meJuros.text)/100),-1 * StrToInt(mePeriodos.Text)))/(StrToFloat(meJuros.Text)/100);  mePrestacao.Text:= FloatToStr(StrToFloat(meQuantia.Text)/Fator);  meTotal.Value:= mePrestacao.Value*mePeriodos.Value; end;[/code:1:9203c35770]...

F�rum Calcular juros compostos #177016