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

PD9waHAKCmVycm9yX3JlcG9ydGluZygtMSk7CgokY3JlZGl0QmFsYW5jZSA9IDQwMDAwOyAvLyDQlNC+0LvQsyDQsNC90L7QvdCwINC/0LXRgNC10LQg0LHQsNC90LrQvtC8CiRwZXJjZW50ID0gMS4wMzsgLy8g0JHQsNC90Log0L3QsNGH0LjRgdC70Y/QtdGCIDMlINCyINC80LXRgdGP0YYg0L7RgiDRgdGD0LzQvNGLCiRzZXJ2aWNlUGF5bWVudCA9IDEwMDA7IC8vINCa0L7QvNC80LjRgdC40Y8g0LfQsCDQvtCx0YHQu9GD0LbQuNCy0LDQvdC40Y8g0YHRh9GR0YLQsAokbW9udGhseVBheW1lbnQgPSA1MDAwOyAvL9Ch0YLQvtC70YzQutC+INCw0L3QvtC9INC/0LvQsNGC0LjRgiDQsiDQvNC10YHRj9GGCiRwYXltZW50VG90YWwgPSAwOyAvLyDQodC60L7Qu9GM0LrQviDQstGB0LXQs9C+INC+0YLQtNCw0Lsg0LHQsNC90LrRgwoKLy8g0L/QvtGB0YfQuNGC0LDQtdC8INGA0LDRgdGF0L7QtNGLIDIwINGA0LDQtyDQvdCwIDIwINC80LXRgdGP0YbQtdCyINCy0L/QtdGA0LXQtApmb3IoJG1vbnRoID0gMTsgJG1vbnRoPD0yMDsgJG1vbnRoICsrKSB7CglpZiAoJGNyZWRpdEJhbGFuY2UgPiA1MDAwKXsKCQkkY3JlZGl0QmFsYW5jZSA9ICgkY3JlZGl0QmFsYW5jZSokcGVyY2VudCkgKyAkc2VydmljZVBheW1lbnQgLSAkbW9udGhseVBheW1lbnQ7CgkJJHBheW1lbnRUb3RhbCA9ICRwYXltZW50VG90YWwgKyAkbW9udGhseVBheW1lbnQ7CgkJZWNobyAiJG1vbnRoINC80LXRgdGP0YYg0YHQv9GD0YHRgtGPOiDQtNC+0LvQsyA9ICRjcmVkaXRCYWxhbmNlINGA0YPQsSwg0LLRi9C/0LvQsNGH0LXQvdC+INCy0YHQtdCz0L4gJHBheW1lbnRUb3RhbCDRgNGD0LEgXG4iOwoJfSBlbHNlIHsKCQkkY3JlZGl0QmFsYW5jZSA9ICgkY3JlZGl0QmFsYW5jZSokcGVyY2VudCkgKyAkc2VydmljZVBheW1lbnQgLSAkbW9udGhseVBheW1lbnQ7CgkJaWYgKCRjcmVkaXRCYWxhbmNlIDw9IDUwMDApewoJCQkkcGF5bWVudFRvdGFsID0gJHBheW1lbnRUb3RhbCArICRjcmVkaXRCYWxhbmNlOwoJCQkkY3JlZGl0QmFsYW5jZSA9ICRjcmVkaXRCYWxhbmNlIC0gJGNyZWRpdEJhbGFuY2U7CgkJCWVjaG8gIiRjcmVkaXRCYWxhbmNlIC0g0LTQvtC70LMsICRwYXltZW50VG90YWwgLSDQstGB0LXQs9C+INCy0YvQv9C70LDRh9C10L3QviI7CgkJCWJyZWFrOwoJCX0KCX0KfSA=