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

PD9waHAKCmVycm9yX3JlcG9ydGluZygtMSk7CgokY3JlZGl0QmFsYW5jZSA9IDQwMDAwOyAvKiDQlNC+0LvQsyDQsNC90L7QvdCwINC/0LXRgNC10LQg0LHQsNC90LrQvtC8ICovCiRwZXJjZW50ID0gMS4wMzsgLyog0JHQsNC90Log0L3QsNGH0LjRgdC70Y/QtdGCIDMlINCyINC80LXRgdGP0YYg0L7RgiDRgdGD0LzQvNGLICovCiRzZXJ2aWNlUGF5bWVudCA9IDEwMDA7IC8qINCQINGC0LDQutC20LUgMTAwMCDRgNGD0LHQu9C10Lkg0LIg0LzQtdGB0Y/RhiDQutC+0LzQuNGB0YHQuNC4INC30LAg0L7QsdGB0LvRg9C20LjQstCw0L3QuNC1INGB0YfQtdGC0LAgKi8KJG1vbnRobHlQYXltZW50ID0gNTAwMDsgLyog0JDQvdC+0L0g0L/Qu9Cw0YLQuNGCIDUwMDAg0YAg0LIg0LzQtdGB0Y/Rhiwg0Y3RgtC+INCy0YHQtSwg0YfRgtC+INC10LzRgyDQtNCw0LXRgiDQvNCw0LzQsCDQvdCwINC30LDQstGC0YDQsNC60LggKi8KJHBheW1lbnRUb3RhbCA9IDA7IC8qINCh0LrQvtC70YzQutC+INCy0YHQtdCz0L4g0L7RgtC00LDQuyDQsdCw0L3QutGDINCw0L3QvtC9ICovCgovKiDQn9C+0YHRh9C40YLQsNC10Lwg0YDQsNGB0YXQvtC00YsgMjAg0YDQsNC3INC90LAgMjAg0LzQtdGB0Y/RhtC10LIg0LLQv9C10YDQtdC0ICovCmZvciAoJG1vbnRoID0gMTsgJG1vbnRoIDw9IDIwOyAkbW9udGggKyspIHsKCSR0b1BheSA9ICgkY3JlZGl0QmFsYW5jZSAqICRwZXJjZW50KSArICRzZXJ2aWNlUGF5bWVudDsKICAgIGlmICgkdG9QYXkgPiAkbW9udGhseVBheW1lbnQpIHsKICAgIAkkY3JlZGl0QmFsYW5jZSA9ICR0b1BheSAtICRtb250aGx5UGF5bWVudDsKICAgIAkkcGF5bWVudFRvdGFsICs9ICRtb250aGx5UGF5bWVudDsKICAgIAllY2hvICJ7JG1vbnRofSDQvNC10YHRj9GGINGB0L/Rg9GB0YLRjzog0LTQvtC70LMgPSB7JGNyZWRpdEJhbGFuY2V9INGA0YPQsSwg0LLRi9C/0LvQsNGH0LXQvdC+INCy0YHQtdCz0L4geyRwYXltZW50VG90YWx9INGA0YPQsS4gXG4iOwogICAgfSBlbHNlIHsKICAgIAkkY3JlZGl0QmFsYW5jZSA9ICR0b1BheTsKICAgIAkkcGF5bWVudFRvdGFsICs9ICRjcmVkaXRCYWxhbmNlOwogICAgCWVjaG8gInskbW9udGh9INC80LXRgdGP0YYg0YHQv9GD0YHRgtGPOiDQtNC+0LvQsyDQstGL0L/Qu9Cw0YfQtdC9LCDQv9C+0YHQu9C10LTQvdGP0Y8g0LLRi9C/0LvQsNGC0LAgeyRjcmVkaXRCYWxhbmNlfSwg0LLRi9C/0LvQsNGH0LXQvdC+INCy0YHQtdCz0L4geyRwYXltZW50VG90YWx9INGA0YPQsS4gXG4iOwogICAgYnJlYWs7CiAgICB9Cn0K