1) $r=bcmul($r,$n--);
return $r;
}
function bcsin($a) {
global $ipreci;
$or= $a;
$r = bcsub($a,bcdiv(bcpow($a,3,$ipreci),6,$ipreci),$ipreci);
$i = 2;
while(bccomp($or,$r,$ipreci)) {
$or=$r;
switch($i%2) {
case 0: $r = bcadd($r,bcdiv(bcpow($a,$i*2+1,$ipreci),bcfact($i*2+1),$ipreci),$ipreci); break;
default: $r = bcsub($r,bcdiv(bcpow($a,$i*2+1,$ipreci),bcfact($i*2+1),$ipreci),$ipreci); break;
}
$i++;
}
return $r;
}
function bccos($a) {
global $ipreci;
$or= $a;
$r = bcsub(1,bcdiv(bcpow($a,2,$ipreci),2,$ipreci),$ipreci);
$i = 2;
while(bccomp($or,$r,$ipreci)) {
$or=$r;
switch($i%2) {
case 0: $r = bcadd($r,bcdiv(bcpow($a,$i*2,$ipreci),bcfact($i*2),$ipreci),$ipreci); break;
default: $r = bcsub($r,bcdiv(bcpow($a,$i*2,$ipreci),bcfact($i*2),$ipreci),$ipreci); break;
}
$i++;
}
return $r;
}
function bctg($a)
{
global $ipreci;
$r=bcdiv(bcsin($a),bccos($a),$ipreci);
return $r;
}
function bccotg($a)
{
global $ipreci;
$r=bcdiv(bccos($a),bcsin($a),$ipreci);
return $r;
}
Function bcExp($xArg)
{
global $ipreci;
$x = Trim($xArg);
$PrevSum = $x - 1;
$CurrTerm = 1;
$CurrSum = bcAdd("1", $x,$ipreci);
$n = 1;
While (bcComp($CurrSum, $PrevSum, $ipreci))
{
$PrevSum = $CurrSum;
$CurrTerm = bcDiv(bcMul($CurrTerm, $x, $ipreci), $n + 1, $ipreci);
$CurrSum = bcAdd($CurrSum, $CurrTerm, $ipreci);
$n++;
}
Return $CurrSum;
}
function bcsh($a)
{
global $ipreci;
$ep=bcexp($a);
$em=bcdiv("1",$ep,$ipreci);
$r2=bcsub($ep,$em,$ipreci);
$r=bcdiv($r2,"2",$ipreci);
return $r;
}
function bcch($a)
{
global $ipreci;
$ep=bcexp($a);
$em=bcdiv("1",$ep,$ipreci);
$r2=bcadd($ep,$em,$ipreci);
$r=bcdiv($r2,"2",$ipreci);
return $r;
}
function bcth($a)
{
global $ipreci;
$r=bcdiv(bcsh($a),bcch($a),$ipreci);
return $r;
}
function bccoth($a)
{
global $ipreci;
$r=bcdiv(bcch($a),bcsh($a),$ipreci);
return $r;
}
?>
";
if(strcmp($nom,'bcfact')==0)
echo $x.'!='.bcfact($x)."
";
elseif(strcmp($nom,'bccos')==0)
echo 'cos('.$x.')='.bccos($x)."
";
elseif(strcmp($nom,'bcsin')==0)
echo 'sin('.$x.')='.bcsin($x)."
";
elseif(strcmp($nom,'bctg')==0)
echo 'tg('.$x.')='.bctg($x)."
";
elseif(strcmp($nom,'bccotg')==0)
echo 'cotg('.$x.')='.bccotg($x)."
";
elseif(strcmp($nom,'bcexp')==0)
echo 'exp('.$x.')='.bcexp($x)."
";
elseif(strcmp($nom,'bcsh')==0)
echo 'sh('.$x.')='.bcsh($x)."
";
elseif(strcmp($nom,'bcch')==0)
echo 'ch('.$x.')='.bcch($x)."
";
elseif(strcmp($nom,'bcth')==0)
echo 'th('.$x.')='.bcth($x)."
";
elseif(strcmp($nom,'bccoth')==0)
echo 'coth('.$x.')='.bccoth($x)."
";
elseif(strcmp($nom,'bcpi')==0)
echo 'pi='.bcpi()."
";
else
{
echo 'la fonction '.$nom.' n\'existe pas'."
";
echo 'Vous devez choisir un nom parmi :'."
";
echo 'bcpi bcfact bccos bcsin bctg bccotg'."
";
echo 'bcexp bcsh bcch bcth bccoth';
}
?>
Utilisez le raccourci "alt+flèche gauche" pour retourner dans la page précédente.