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

PD9waHAKaGVhZGVyKCJDb250ZW50LVR5cGU6IHRleHQvcGxhaW47IGNoYXJzZXQ9dXRmLTgiKTsKZXJyb3JfcmVwb3J0aW5nKC0xKTsKCiRjcmVkaXRCYWxhbmNlID0gNDAwMDA7IC8qINCU0L7Qu9CzINCw0L3QvtC90LAg0L/QtdGA0LXQtCDQsdCw0L3QutC+0LwgKi8KJHBlcmNlbnQgPSAxLjAzOyAvKiDQkdCw0L3QuiDQvdCw0YfQuNGB0LvRj9C10YIgMyUg0LIg0LzQtdGB0Y/RhiDQvtGCINGB0YPQvNC80YsgKi8KJHNlcnZpY2VQYXltZW50ID0gMTAwMDsgLyog0JAg0YLQsNC60LbQtSAxMDAwINGA0YPQsdC70LXQuSDQsiDQvNC10YHRj9GGINC60L7QvNC40YHRgdC40Lgg0LfQsCDQvtCx0YHQu9GD0LbQuNCy0LDQvdC40LUg0YHRh9C10YLQsCAqLwokbW9udGhseVBheW1lbnQgPSA1MDAwOyAvKiDQkNC90L7QvSDQv9C70LDRgtC40YIgNTAwMCDRgCDQsiDQvNC10YHRj9GGLCDRjdGC0L4g0LLRgdC1LCDRh9GC0L4g0LXQvNGDINC00LDQtdGCINC80LDQvNCwINC90LAg0LfQsNCy0YLRgNCw0LrQuCAqLwokcGF5bWVudFRvdGFsID0gMDsgLyog0KHQutC+0LvRjNC60L4g0LLRgdC10LPQviDQvtGC0LTQsNC7INCx0LDQvdC60YMg0LDQvdC+0L0gKi8KCi8qINCf0L7RgdGH0LjRgtCw0LXQvCDRgNCw0YHRhdC+0LTRiyAyMCDRgNCw0Lcg0L3QsCAyMCDQvNC10YHRj9GG0LXQsiDQstC/0LXRgNC10LQgKi8KZm9yICgkbW9udGggPSAxOyAkbW9udGggPD0gNjA7ICRtb250aCsrKSB7CiAgICAkZm9yZWNhc3RDcmVkaXRCYWxhbmNlID0gKCRjcmVkaXRCYWxhbmNlICogJHBlcmNlbnQpICsgJHNlcnZpY2VQYXltZW50OwogICAgaWYgKCRmb3JlY2FzdENyZWRpdEJhbGFuY2UgPj0gNTAwMCkgeyAgLy/Qv9GA0L7QstC10YDQutCwINCx0L7Qu9GM0YjQtSDQu9C4INC00L7Qu9CzINGI0LrQvtC70YzQvdC40LrQsCDRh9C10Lwg0LXQs9C+INC80LXRgdGP0YfQvdGL0Lkg0LTQvtGF0L7QtCDRgSDQt9Cw0LLRgtGA0LDQutC+0LIKICAgICAgICAkY3JlZGl0QmFsYW5jZSA9ICRmb3JlY2FzdENyZWRpdEJhbGFuY2UgLSAkbW9udGhseVBheW1lbnQ7CiAgICAgICAgJHBheW1lbnRUb3RhbCA9ICRwYXltZW50VG90YWwgKyAkbW9udGhseVBheW1lbnQ7CiAgICAgICAgZWNobyAieyRtb250aH0g0LzQtdGB0Y/RhiDRgdC/0YPRgdGC0Y86INC00L7Qu9CzID0geyRjcmVkaXRCYWxhbmNlfSDRgNGD0LEsINCy0YvQv9C70LDRh9C10L3QviDQstGB0LXQs9C+IHskcGF5bWVudFRvdGFsfSDRgNGD0LEuIFxuIjsKICAgICAgICAvKiDQldGB0LvQuCDQsdCw0LvQsNC90YEg0L7RgtGA0LjRhtCw0YLQtdC70YzQvdGL0Lkg4oCUINGF0LLQsNGC0LjRgiDRgdGH0LjRgtCw0YLRjCAqLwogICAgICAgIGlmICgkY3JlZGl0QmFsYW5jZSA8IDApIHsKICAgICAgICAgICAgZWNobyAi0KEg0LzQtdC90Y8g0YXQstCw0YLQuNGCIVxuIjsKICAgICAgICAgICAgYnJlYWs7CiAgICAgICAgfQogICAgfSBlbHNlIHsgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIC8v0L/RgNC+0LLQtdGA0LrQsCDQsdC+0LvRjNGI0LUg0LvQuCDQtNC+0LvQsyDRiNC60L7Qu9GM0L3QuNC60LAg0YfQtdC8INC10LPQviDQvNC10YHRj9GH0L3Ri9C5INC00L7RhdC+0LQg0YEg0LfQsNCy0YLRgNCw0LrQvtCyCiAgICAgICAgZWNobyAi0JTQvtC70LMg0LzQtdC90YzRiNC1IDUwMDAg0YDRg9Cx0LvQtdC5LCDQsCDQuNC80LXQvdC90L4gJGNyZWRpdEJhbGFuY2UgXG4iOwogICAgICAgICRjcmVkaXRCYWxhbmNlID0gJGZvcmVjYXN0Q3JlZGl0QmFsYW5jZTsKICAgICAgICAkcGF5bWVudFRvdGFsID0gJHBheW1lbnRUb3RhbCArICRjcmVkaXRCYWxhbmNlOwogICAgICAgICRmb3JtYXRlZFBheW1lbnRUb3RhbCA9IHJvdW5kKCRwYXltZW50VG90YWwsIDIpOwogICAgICAgIGVjaG8gItCU0L7Qu9CzINGD0L/Qu9Cw0YfQtdC9INC30LAgJG1vbnRoINC80LXRgdGP0YbQtdCyINC4INGBINC/0YDQvtGG0LXQvdGC0LDQvNC4INC4INC60L7QvNC40YHRgdC40LXQuSDRiNC60L7Qu9GM0L3QuNC6INC30LDQv9C70LDRgtC40LsgJGZvcm1hdGVkUGF5bWVudFRvdGFsIjsKICAgICAgICBicmVhazsKICAgIH0KfQ==