Formulário para calcular o Montante final depois de um determinado período.
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<META HTTP-EQUIV="Expires" CONTENT="Fri, Jan 01 1900 00:00:00 GMT">
<META HTTP-EQUIV="Pragma" CONTENT="no-cache">
<META HTTP-EQUIV="Cache-Control" CONTENT="no-cache">
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<meta name="author" content="Mauricio Maciel">
<META HTTP-EQUIV="Reply-to" CONTENT="maciel@brasildata.net">
<meta name="generator" content="PHPEd 1.80">
<META NAME="description" CONTENT="Fórumla para Cálculo de Juros">
<meta name="keywords" content="calculo, juro, composto, financiamento, capital, montante">
<META NAME="Creation_Date" CONTENT="08/15/2000">
<meta name="revisit-after" content="15 days">
<title>Cálculo de Juros</title>
</head>
<body>
<p><h1>Formulário para cálculo de juros compostos</h1>
<p><b>Como usar:</b> Preencha todos os campos com os formatos pedidos. Capital Empatado é o dinheiro usado
no início do financiamento/investimento, a taxa de juros (ex: para 2% coloque somente o dígito 2) e o Período de
Capitalização é o tempo que este vai levar (preencha com meses). O montante no fim do período será o Capital
empatado mais os juros pelo período determinado. </p>
<FORM action="juros.php" method="POST" name="formulario">
<p>Capital Empatado: R$ <INPUT TYPE="TEXT" name="c" size="20" maxlength="20"></p>
<p>Taxa de Juros: <INPUT TYPE="TEXT" name="t" size="5" maxlength="5"> %</p>
<p>Período de Capitalização: <INPUT TYPE="TEXT" name="n" size="5" maxlength="5"> meses</p>
<INPUT TYPE="SUBMIT" value="Calcular">
<INPUT TYPE="HIDDEN" name="op" value="calc">
</FORM>
<?
if (!$c || !$t || !$n) {
echo "Valor inválido! Preencha o formulário novamente.";
exit;
}
if (is_numeric ($c) and is_numeric ($t) and is_numeric ($n) ) {
$op = 'calc'; }
else { echo "Valor inválido! Preencha o formulário novamente. \n\n";
exit;
}
if ($op == 'calc') {
$i = ($t/100);
$m = ($c* (potencia (1+$i,$n)));
echo "Montante no fim do Período: R$". converte_valor(intval($m*100)). " \n\n";
}
function potencia($a,$b){
$resultado = $a;
while ($b >= 2) {
$resultado *= $a;
$b--;
}
return $resultado;
}
function converte_valor($valor)
{
$valor=str_replace(".", "", $valor);
$tvalor=substr("$valor", 0, -2);
$vfinal=substr("$valor", -2);
$nvalor="";
while (strlen($tvalor>3))
{
if (strlen($nvalor)>0)
{
$nvalor=substr($tvalor, -3).".".$nvalor;
}
else
{
$nvalor=substr($tvalor, -3);
}
$tvalor=substr($tvalor, 0,-3);
}
if ((strlen($tvalor)<3)and (strlen($tvalor)!=0))
{
$nvalor=$tvalor.".".$nvalor;
}
return $nvalor.",".$vfinal;
}
?>
</body>
</html>
