<?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 ++) {
 
            if ($creditBalance > 0) {
 
                $creditBalance = ( $creditBalance * $percent ) + $servicePayment - $monthlyPayment;
                $paymentTotal = $paymentTotal + $monthlyPayment;
 
                if ($creditBalance > 0) {
 
                    echo "{$month} месяц спустя: долг = {$creditBalance} руб, выплачено всего {$paymentTotal} руб. \n";
 
                } else {
 
                    echo "$month месяц спустя: долг = 0 руб, выплачено всего {$paymentTotal - abs($creditBalance)} руб. \n";
 
                }
            }
        }
 
        ?>

PD9waHAKICAgICAgICAKICAgICAgICBlcnJvcl9yZXBvcnRpbmcoLTEpOwoKICAgICAgICAkY3JlZGl0QmFsYW5jZSA9IDQwMDAwOyAvKiDQlNC+0LvQsyDQsNC90L7QvdCwINC/0LXRgNC10LQg0LHQsNC90LrQvtC8ICovCiAgICAgICAgJHBlcmNlbnQgPSAxLjAzOyAvKiDQkdCw0L3QuiDQvdCw0YfQuNGB0LvRj9C10YIgMyUg0LIg0LzQtdGB0Y/RhiDQvtGCINGB0YPQvNC80YsgKi8KICAgICAgICAkc2VydmljZVBheW1lbnQgPSAxMDAwOyAvKiDQkCDRgtCw0LrQttC1IDEwMDAg0YDRg9Cx0LvQtdC5INCyINC80LXRgdGP0YYg0LrQvtC80LjRgdGB0LjQuCDQt9CwINC+0LHRgdC70YPQttC40LLQsNC90LjQtSDRgdGH0LXRgtCwICovCiAgICAgICAgJG1vbnRobHlQYXltZW50ID0gNTAwMDsgLyog0JDQvdC+0L0g0L/Qu9Cw0YLQuNGCIDUwMDAg0YAg0LIg0LzQtdGB0Y/Rhiwg0Y3RgtC+INCy0YHQtSwg0YfRgtC+INC10LzRgyDQtNCw0LXRgiDQvNCw0LzQsCDQvdCwINC30LDQstGC0YDQsNC60LggKi8KICAgICAgICAkcGF5bWVudFRvdGFsID0gMDsgLyog0KHQutC+0LvRjNC60L4g0LLRgdC10LPQviDQvtGC0LTQsNC7INCx0LDQvdC60YMg0LDQvdC+0L0gKi8KCiAgICAgICAgLyog0J/QvtGB0YfQuNGC0LDQtdC8INGA0LDRgdGF0L7QtNGLIDIwINGA0LDQtyDQvdCwIDIwINC80LXRgdGP0YbQtdCyINCy0L/QtdGA0LXQtCAqLwogICAgICAgIGZvciAoJG1vbnRoID0gMTsgJG1vbnRoIDw9IDIwOyAkbW9udGggKyspIHsKCiAgICAgICAgICAgIGlmICgkY3JlZGl0QmFsYW5jZSA+IDApIHsKICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgJGNyZWRpdEJhbGFuY2UgPSAoICRjcmVkaXRCYWxhbmNlICogJHBlcmNlbnQgKSArICRzZXJ2aWNlUGF5bWVudCAtICRtb250aGx5UGF5bWVudDsKICAgICAgICAgICAgICAgICRwYXltZW50VG90YWwgPSAkcGF5bWVudFRvdGFsICsgJG1vbnRobHlQYXltZW50OwogICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICBpZiAoJGNyZWRpdEJhbGFuY2UgPiAwKSB7CiAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgZWNobyAieyRtb250aH0g0LzQtdGB0Y/RhiDRgdC/0YPRgdGC0Y86INC00L7Qu9CzID0geyRjcmVkaXRCYWxhbmNlfSDRgNGD0LEsINCy0YvQv9C70LDRh9C10L3QviDQstGB0LXQs9C+IHskcGF5bWVudFRvdGFsfSDRgNGD0LEuIFxuIjsKICAgICAgICAgICAgICAgICAgICAKICAgICAgICAgICAgICAgIH0gZWxzZSB7CiAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgICAgICAgICAgICAgZWNobyAiJG1vbnRoINC80LXRgdGP0YYg0YHQv9GD0YHRgtGPOiDQtNC+0LvQsyA9IDAg0YDRg9CxLCDQstGL0L/Qu9Cw0YfQtdC90L4g0LLRgdC10LPQviB7JHBheW1lbnRUb3RhbCAtIGFicygkY3JlZGl0QmFsYW5jZSl9INGA0YPQsS4gXG4iOwogICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgfQogICAgICAgICAgICB9CiAgICAgICAgfQogICAgICAgIAogICAgICAgID8+