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

PD9waHAKCmVycm9yX3JlcG9ydGluZygtMSk7CgokY3JlZGl0QmFsYW5jZSA9IDQwMDAwOyAvKiDQlNC+0LvQsyDQkNC90L7QvdGH0LjQutCwINC/0LXRgNC10LQg0LHQsNC90LrQvtC8ICovCiRwZXJjZW50ID0gMS4wMzsgLyog0JHQsNC90Log0L3QsNGH0LjRgdC70Y/QtdGCIDMlINC+0YIg0YHRg9C80LzRiyDQsiDQvNC10YHRj9GGICovCiRzZXJ2aWNlUGF5bWVudCA9IDEwMDA7IC8qINCf0LvRjtGBIDEwMDAg0LIg0LzQtdGB0Y/RhiDQt9CwINC+0LHRgdC70YPQttC40LLQsNC90LjQtSDQutGA0LXQtNC40YLQsCAqLwokbW9udGhseVBheW1lbnQgPSA1MDAwOyAvKiDQkNC90L7QvdGH0LjQuiDQvNC+0LbQtdGCINC/0LvQsNGC0LjRgtGMINGC0L7Qu9GM0LrQviA1MDAwINCyINC80LXRgdGP0YYgKi8KJHBheW1lbnRUb3RhbCA9IDA7IC8qINCe0LHRidCw0Y8g0LLRi9C/0LvQsNGC0LAg0JDQvdC+0L3Rh9C40LrQsCAqLwoKZm9yICgkbW9udGggPSAxOyAkbW9udGggPD0gMjA7ICRtb250aCArKykgeyAvKtCe0LHRidC40Lkg0YbQuNC60Lsg0YEg0L/QvtC00YHRh9GR0YLQvtC8INGA0LDRgdGF0L7QtNC+0LIg0JDQvdC+0L3Rh9C40LrQsCovCgkKCSRkZWJ0ID0gKCRjcmVkaXRCYWxhbmNlICogJHBlcmNlbnQpICsgJHNlcnZpY2VQYXltZW50OyAvKtCU0L7Qu9CzINCQ0L3QvtC90YfQuNC60LAsINC60L7RgtC+0YDRi9C5INC+0YLQu9C40YfQsNC10YLRgdGPINC+0YIg0LjQt9C90LDRh9Cw0LvRjNC90L7QuSDRgdGD0LzQvNGLICjQmtGA0LXQtNC40YLQkdCw0LvQsNC90YEpKi8KCQoJaWYgKCRkZWJ0IDw9ICRtb250aGx5UGF5bWVudCkgeyAvKtCV0YHQu9C4INC00L7Qu9CzINC80LXQvdGM0YjQtSDRgdGD0LzQvNGLINC80LXRgdGP0YfQvdC+0Lkg0LLRi9C/0LvQsNGC0Ysg0LjQu9C4INGA0LDQstC10L0g0LXQuSovCgkJCgkJJGNyZWRpdEJhbGFuY2UgPSAwOyAKCQkkcGF5bWVudFRvdGFsID0gJHBheW1lbnRUb3RhbCArICRkZWJ0OwogICAgICAgICAgICBlY2hvICJ7JG1vbnRofSDQvNC10YHRj9GGINGB0L/Rg9GB0YLRjzog0LTQvtC70LMgPSB7JGNyZWRpdEJhbGFuY2V9INGA0YPQsSwg0LLRi9C/0LvQsNGH0LXQvdC+INCy0YHQtdCz0L4geyRwYXltZW50VG90YWx9INGA0YPQsS5cbtCa0LDQutC40Lwg0LbQtSDRjdGC0L4g0L7QutCw0LfQsNC70L7RgdGMINC+0YfQtdCy0LjQtNC90YvQvCwg0LvQsNC70LDQu9CwIVxu0KHQv9Cw0YHQuNCx0L4sINCe0J8hIjsKICAgICAgICAgICAgYnJlYWs7CiAgICB9IGVsc2UgeyAvKtCV0YHQu9C4INC00L7Qu9CzINC+0YHRgtCw0ZHRgtGB0Y8g0LHQvtC70YzRiNC1INGB0YPQvNC80Ysg0LzQtdGB0Y/Rh9C90L7QuSDQstGL0L/Qu9Cw0YLRiyDQkNC90L7QvdGH0LjQutCwKi8KCQkKCQkkY3JlZGl0QmFsYW5jZSA9ICgkY3JlZGl0QmFsYW5jZSAqICRwZXJjZW50KSArICRzZXJ2aWNlUGF5bWVudCAtICRtb250aGx5UGF5bWVudDsKCQkkcGF5bWVudFRvdGFsID0gJHBheW1lbnRUb3RhbCArICRtb250aGx5UGF5bWVudDsKCQkJZWNobyAieyRtb250aH0g0LzQtdGB0Y/RhiDRgdC/0YPRgdGC0Y86INC00L7Qu9CzID0geyRjcmVkaXRCYWxhbmNlfSDRgNGD0LEsINCy0YvQv9C70LDRh9C10L3QviDQstGB0LXQs9C+IHskcGF5bWVudFRvdGFsfSDRgNGD0LEuXG4iOwoJCX0KfQoKPz4=