<?php
 
error_reporting(-1);
 
$creditBalance = 40000; /* Долг анона перед банком */
$percent = 1.03; /* Банк начисляет 3% в месяц от суммы */
$servicePayment = 1000; /* А также 1000 рублей в месяц комиссии за обслуживание счета */
$monthlyPayment = 5000; /* Анон платит 5000 р в месяц, это все, что ему дает мама на завтраки */
$paymentTotal = 0; /* Сколько всего отдал банку анон */
 
/* Посчитаем расходы 20 раз на 20 месяцев вперед */
 
echo "Выплаты по кредиту:\n";
 
for ($month = 1; $month <= 20; $month ++) {
 
    if ($creditBalance < 5000) {
    	  $creditBalance = ( $creditBalance * $percent ) + $servicePayment;
    	  $paymentTotal = $paymentTotal + $creditBalance;
    	  $creditBalance = 0;
    	  echo "{$month} месяц спустя: долг = {$creditBalance} руб, выплачено всего {$paymentTotal} руб. \n";
    }
    if ($creditBalance < 5000) {
    	  $creditBalance = ( $creditBalance * $percent ) + $servicePayment;
	      $paymentTotal+=$creditBalance;
		  $month++;
		  $creditBalance=0;
          echo "{$month} месяц спустя: долг = {$creditBalance} руб, выплачено всего {$paymentTotal} руб. \n";
    }
 
    if ($creditBalance==0) {
          echo "С меня хватит!\n";
          break;
    }
 
	$creditBalance = ( $creditBalance * $percent ) + $servicePayment - $monthlyPayment;
	$paymentTotal = $paymentTotal + $monthlyPayment;
	echo "{$month} месяц спустя: долг = {$creditBalance} руб, выплачено всего {$paymentTotal} руб. \n";
}
 
echo "Через сколько лет в банке будет миллион?\n";
 
$totalMoney=10000;
$year=0;
$age=16;
 
for ($i=1;$totalMoney<=1000000;$i++){
	$totalMoney=$totalMoney*1.10;
	$year++;
	$age++;
}
 
echo "Спустя $year лет на счету окажется $totalMoney\n";
echo "А владельцу счета будет $age лет";
 
?>

PD9waHAKCmVycm9yX3JlcG9ydGluZygtMSk7CgokY3JlZGl0QmFsYW5jZSA9IDQwMDAwOyAvKiDQlNC+0LvQsyDQsNC90L7QvdCwINC/0LXRgNC10LQg0LHQsNC90LrQvtC8ICovCiRwZXJjZW50ID0gMS4wMzsgLyog0JHQsNC90Log0L3QsNGH0LjRgdC70Y/QtdGCIDMlINCyINC80LXRgdGP0YYg0L7RgiDRgdGD0LzQvNGLICovCiRzZXJ2aWNlUGF5bWVudCA9IDEwMDA7IC8qINCQINGC0LDQutC20LUgMTAwMCDRgNGD0LHQu9C10Lkg0LIg0LzQtdGB0Y/RhiDQutC+0LzQuNGB0YHQuNC4INC30LAg0L7QsdGB0LvRg9C20LjQstCw0L3QuNC1INGB0YfQtdGC0LAgKi8KJG1vbnRobHlQYXltZW50ID0gNTAwMDsgLyog0JDQvdC+0L0g0L/Qu9Cw0YLQuNGCIDUwMDAg0YAg0LIg0LzQtdGB0Y/Rhiwg0Y3RgtC+INCy0YHQtSwg0YfRgtC+INC10LzRgyDQtNCw0LXRgiDQvNCw0LzQsCDQvdCwINC30LDQstGC0YDQsNC60LggKi8KJHBheW1lbnRUb3RhbCA9IDA7IC8qINCh0LrQvtC70YzQutC+INCy0YHQtdCz0L4g0L7RgtC00LDQuyDQsdCw0L3QutGDINCw0L3QvtC9ICovCgovKiDQn9C+0YHRh9C40YLQsNC10Lwg0YDQsNGB0YXQvtC00YsgMjAg0YDQsNC3INC90LAgMjAg0LzQtdGB0Y/RhtC10LIg0LLQv9C10YDQtdC0ICovCgplY2hvICLQktGL0L/Qu9Cw0YLRiyDQv9C+INC60YDQtdC00LjRgtGDOlxuIjsKCmZvciAoJG1vbnRoID0gMTsgJG1vbnRoIDw9IDIwOyAkbW9udGggKyspIHsKCQogICAgaWYgKCRjcmVkaXRCYWxhbmNlIDwgNTAwMCkgewogICAgCSAgJGNyZWRpdEJhbGFuY2UgPSAoICRjcmVkaXRCYWxhbmNlICogJHBlcmNlbnQgKSArICRzZXJ2aWNlUGF5bWVudDsKICAgIAkgICRwYXltZW50VG90YWwgPSAkcGF5bWVudFRvdGFsICsgJGNyZWRpdEJhbGFuY2U7CiAgICAJICAkY3JlZGl0QmFsYW5jZSA9IDA7CiAgICAJICBlY2hvICJ7JG1vbnRofSDQvNC10YHRj9GGINGB0L/Rg9GB0YLRjzog0LTQvtC70LMgPSB7JGNyZWRpdEJhbGFuY2V9INGA0YPQsSwg0LLRi9C/0LvQsNGH0LXQvdC+INCy0YHQtdCz0L4geyRwYXltZW50VG90YWx9INGA0YPQsS4gXG4iOwogICAgfQogICAgaWYgKCRjcmVkaXRCYWxhbmNlIDwgNTAwMCkgewogICAgCSAgJGNyZWRpdEJhbGFuY2UgPSAoICRjcmVkaXRCYWxhbmNlICogJHBlcmNlbnQgKSArICRzZXJ2aWNlUGF5bWVudDsKCSAgICAgICRwYXltZW50VG90YWwrPSRjcmVkaXRCYWxhbmNlOwoJCSAgJG1vbnRoKys7CgkJICAkY3JlZGl0QmFsYW5jZT0wOwogICAgICAgICAgZWNobyAieyRtb250aH0g0LzQtdGB0Y/RhiDRgdC/0YPRgdGC0Y86INC00L7Qu9CzID0geyRjcmVkaXRCYWxhbmNlfSDRgNGD0LEsINCy0YvQv9C70LDRh9C10L3QviDQstGB0LXQs9C+IHskcGF5bWVudFRvdGFsfSDRgNGD0LEuIFxuIjsKICAgIH0KICAgIAogICAgaWYgKCRjcmVkaXRCYWxhbmNlPT0wKSB7CiAgICAgICAgICBlY2hvICLQoSDQvNC10L3RjyDRhdCy0LDRgtC40YIhXG4iOwogICAgICAgICAgYnJlYWs7CiAgICB9CgkKCSRjcmVkaXRCYWxhbmNlID0gKCAkY3JlZGl0QmFsYW5jZSAqICRwZXJjZW50ICkgKyAkc2VydmljZVBheW1lbnQgLSAkbW9udGhseVBheW1lbnQ7CgkkcGF5bWVudFRvdGFsID0gJHBheW1lbnRUb3RhbCArICRtb250aGx5UGF5bWVudDsKCWVjaG8gInskbW9udGh9INC80LXRgdGP0YYg0YHQv9GD0YHRgtGPOiDQtNC+0LvQsyA9IHskY3JlZGl0QmFsYW5jZX0g0YDRg9CxLCDQstGL0L/Qu9Cw0YfQtdC90L4g0LLRgdC10LPQviB7JHBheW1lbnRUb3RhbH0g0YDRg9CxLiBcbiI7Cn0KCmVjaG8gItCn0LXRgNC10Lcg0YHQutC+0LvRjNC60L4g0LvQtdGCINCyINCx0LDQvdC60LUg0LHRg9C00LXRgiDQvNC40LvQu9C40L7QvT9cbiI7CgokdG90YWxNb25leT0xMDAwMDsKJHllYXI9MDsKJGFnZT0xNjsKCmZvciAoJGk9MTskdG90YWxNb25leTw9MTAwMDAwMDskaSsrKXsKCSR0b3RhbE1vbmV5PSR0b3RhbE1vbmV5KjEuMTA7CgkkeWVhcisrOwoJJGFnZSsrOwp9CgplY2hvICLQodC/0YPRgdGC0Y8gJHllYXIg0LvQtdGCINC90LAg0YHRh9C10YLRgyDQvtC60LDQttC10YLRgdGPICR0b3RhbE1vbmV5XG4iOwplY2hvICLQkCDQstC70LDQtNC10LvRjNGG0YMg0YHRh9C10YLQsCDQsdGD0LTQtdGCICRhZ2Ug0LvQtdGCIjsKCj8+