contrib/exp/exp2.php

   1 <?php
   2 error_reporting(E_ALL | E_STRICT);
   3
   4 bcscale(20);
   5
   6 $balance = 1;
   7 $years = 100;
   8 $rate = 0.05;
   9
  10 $totalMonths = $years * 12;
  11
  12 print 'Invest ' . $balance . ' EUR and come back later.' . PHP_EOL;
  13
  14 for ($i = 1; $i <= $totalMonths; $i++) {
  15         // Reduce interest rate every month
  16         $rate = bcdiv($rate, 1.001);
  17
  18         // Calculate interest
  19         $interest = bcmul($balance, $rate);
  20
  21         // ... and add it to balance
  22         $balance = bcadd($balance, $interest);
  23
  24         print 'Month ' . $i . ': rate=' . bcmul($rate, 100) . '%,interest=' . $interest . ',balance=' . $balance . PHP_EOL;
  25 } // END - foreach
  26
  27 print 'After ' . $totalMonths . ' months (' . $years . ' years) you have ' . $balance . ' EUR back.' . PHP_EOL;
  28 //print 'Length:' . strlen($balance) . PHP_EOL;
  29
  30 ?>