<?php
 
error_reporting(-1);
header("Content-Type: text/plain; charset=utf-8");
 
$creditBalanceAnon = 40000; /* Долг анона перед банком */
$percent = 1.03; /* Банк начисляет 3% в месяц от суммы */
$servicePayment = 1000; /* А также 1000 рублей в месяц комиссии за обслуживание счета */
$monthlyPayment = 5000; /* Анон платит 5000 р в месяц, это все, что ему дает мама на завтраки */
$paymentTotal = 0; /* Сколько всего отдал банку анон */
$month = 1;
 
do {
    $creditBalanceAnon = ( $creditBalanceAnon * $percent ) + $servicePayment;
 
    if ($creditBalanceAnon <= $monthlyPayment) {
        $monthlyPayment = $creditBalanceAnon;
    }
    $creditBalanceAnon -= $monthlyPayment;
    $paymentTotal += $monthlyPayment;
 
    echo "{$month} месяц спустя: долг = {$creditBalanceAnon} руб, выплачено всего {$paymentTotal} руб. \n";
    $month ++;
} while ($creditBalanceAnon != 0);

PD9waHAKCmVycm9yX3JlcG9ydGluZygtMSk7CmhlYWRlcigiQ29udGVudC1UeXBlOiB0ZXh0L3BsYWluOyBjaGFyc2V0PXV0Zi04Iik7CgokY3JlZGl0QmFsYW5jZUFub24gPSA0MDAwMDsgLyog0JTQvtC70LMg0LDQvdC+0L3QsCDQv9C10YDQtdC0INCx0LDQvdC60L7QvCAqLwokcGVyY2VudCA9IDEuMDM7IC8qINCR0LDQvdC6INC90LDRh9C40YHQu9GP0LXRgiAzJSDQsiDQvNC10YHRj9GGINC+0YIg0YHRg9C80LzRiyAqLwokc2VydmljZVBheW1lbnQgPSAxMDAwOyAvKiDQkCDRgtCw0LrQttC1IDEwMDAg0YDRg9Cx0LvQtdC5INCyINC80LXRgdGP0YYg0LrQvtC80LjRgdGB0LjQuCDQt9CwINC+0LHRgdC70YPQttC40LLQsNC90LjQtSDRgdGH0LXRgtCwICovCiRtb250aGx5UGF5bWVudCA9IDUwMDA7IC8qINCQ0L3QvtC9INC/0LvQsNGC0LjRgiA1MDAwINGAINCyINC80LXRgdGP0YYsINGN0YLQviDQstGB0LUsINGH0YLQviDQtdC80YMg0LTQsNC10YIg0LzQsNC80LAg0L3QsCDQt9Cw0LLRgtGA0LDQutC4ICovCiRwYXltZW50VG90YWwgPSAwOyAvKiDQodC60L7Qu9GM0LrQviDQstGB0LXQs9C+INC+0YLQtNCw0Lsg0LHQsNC90LrRgyDQsNC90L7QvSAqLwokbW9udGggPSAxOwoKZG8gewogICAgJGNyZWRpdEJhbGFuY2VBbm9uID0gKCAkY3JlZGl0QmFsYW5jZUFub24gKiAkcGVyY2VudCApICsgJHNlcnZpY2VQYXltZW50OwoKICAgIGlmICgkY3JlZGl0QmFsYW5jZUFub24gPD0gJG1vbnRobHlQYXltZW50KSB7CiAgICAgICAgJG1vbnRobHlQYXltZW50ID0gJGNyZWRpdEJhbGFuY2VBbm9uOwogICAgfQogICAgJGNyZWRpdEJhbGFuY2VBbm9uIC09ICRtb250aGx5UGF5bWVudDsKICAgICRwYXltZW50VG90YWwgKz0gJG1vbnRobHlQYXltZW50OwoKICAgIGVjaG8gInskbW9udGh9INC80LXRgdGP0YYg0YHQv9GD0YHRgtGPOiDQtNC+0LvQsyA9IHskY3JlZGl0QmFsYW5jZUFub259INGA0YPQsSwg0LLRi9C/0LvQsNGH0LXQvdC+INCy0YHQtdCz0L4geyRwYXltZW50VG90YWx9INGA0YPQsS4gXG4iOwogICAgJG1vbnRoICsrOwp9IHdoaWxlICgkY3JlZGl0QmFsYW5jZUFub24gIT0gMCk7