<?[SPAN=darling]php[/SPAN]

 //Процентная ставка
 $procent = '18.9';

 //Месяцев в году
 $total_month = 12;

 //Сумма кредита
 $summa = 100000;

 //Количество месяцев кредита
 $month = 4;

 //Коэффициент
 $kof = ($procent / $total_month) / 100;

 //Коэффициент
 $k = ($kof * (pow((1 + $kof),$month))) / (pow((1 + $kof), $month) - 1);

 //Аннуетентный платеж за месяц
 $anu = sprintf("%01.2f",$k * $summa);

 //Процент за месяц
 $e = $kof * $summa;

 //Основной долг
 $dolg = $anu - $e;

 //Процент за месяц
 $p = array();

 //Основной долг
 $d = array();

 //Остаток задолжности
 $o = array();

 $j = 1;


 for($i = 1; $i <= $month; $i++)
 {
    if(empty($p))
	{
	  $p[$j] = $kof * $summa; //1575.00
 
      $d[$j] = $anu - $e; // 32813.80

	  $o[$j] = $summa - $dolg;  //67186.20
	}

	else
	{
	   if($i != $month)
       {
	      $p[] = round($kof * $o[$i - 1], 2);

	      $d[] = round($anu - $p[$i], 2);

	      $o[] = round($o[$i - 1] - $d[$i], 2);
       }

       else
       {
          $p[] = round($kof * $o[$i - 1], 2);

	      $d[] = round($anu - $p[$i], 2);

	      $o[] = round($o[$i - 1] - $d[$i], 2);
       }
	}


 }
 
 echo '<pre>';
 print_r($p);
 echo '</pre>';

  echo '<pre>';
 print_r($d);
 echo '</pre>';

  echo '<pre>';
 print_r($o);
 echo '</pre>';

 echo "<br>". array_sum($d);
  echo "<br>". array_sum($o);
   echo "<br>". array_sum($p);

Array
(
    [1] => 1575
    [2] => 1190.43
    [3] => 799.81
    [4] => 403.03
)

Array
(
    [1] => 24417.07
    [2] => 24801.64
    [3] => 25192.26
    [4] => 25589.04
)

Array
(
    [1] => 75582.93
    [2] => 50781.29
    [3] => 25589.03
    [4] => -0.01
)


100000.01
151953.24
3968.27

Спустя 20 минут, 54 секунды (1.12.2011 - 21:57) Kuliev написал(а):

Nikitian
Не Ceil() не прокатывает, там чтото хитрое есть