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

ZXJyb3JfcmVwb3J0aW5nKC0xKTsKCiRjcmVkaXRCYWxhbmNlID0gNDAwMDA7IC8qINCU0L7Qu9CzINCw0L3QvtC90LAg0L/QtdGA0LXQtCDQsdCw0L3QutC+0LwgKi8KJHBlcmNlbnQgPSAxLjAzOyAvKiDQkdCw0L3QuiDQvdCw0YfQuNGB0LvRj9C10YIgMyUg0LIg0LzQtdGB0Y/RhiDQvtGCINGB0YPQvNC80YsgKi8KJHNlcnZpY2VQYXltZW50ID0gMTAwMDsgLyog0JAg0YLQsNC60LbQtSAxMDAwINGA0YPQsdC70LXQuSDQsiDQvNC10YHRj9GGINC60L7QvNC40YHRgdC40Lgg0LfQsCDQvtCx0YHQu9GD0LbQuNCy0LDQvdC40LUg0YHRh9C10YLQsCAqLwokbW9udGhseVBheW1lbnQgPSA1MDAwOyAvKiDQv9C70LDRgtC40YIgNTAwMCDRgCDQsiDQvNC10YHRj9GGLCDRjdGC0L4g0LLRgdC1LCDRh9GC0L4g0LXQvNGDINC00LDQtdGCINC80LDQvNCwINC90LAg0LfQsNCy0YLRgNCw0LrQuCAqLwokcGF5bWVudFRvdGFsID0gMDsgLyog0KHQutC+0LvRjNC60L4g0LLRgdC10LPQviDQvtGC0LTQsNC7INCx0LDQvdC60YMgKi8KCmZvciAoJG1vbnRoID0gMTsgOyAkbW9udGggKyspIAp7CgkkY3JlZGl0QmFsYW5jZSA9ICRjcmVkaXRCYWxhbmNlICogJHBlcmNlbnQgKyAkc2VydmljZVBheW1lbnQ7IC8v0L3QsNGH0LjRgdC70LXQvdC40LUg0L/RgNC+0YbQtdC90YLQvtCyINC4INC60L7QvNC40YHRgdC40Lgg0LIg0L3QsNGH0LDQu9C1INC80LXRgdGP0YbQsAoJaWYgKCRjcmVkaXRCYWxhbmNlIDwgJG1vbnRobHlQYXltZW50KSAvL9C10YHQu9C4INC/0LvQsNGC0LjRgtGMINC/0L4g0LrRgNC10LTQuNGC0YMg0LzQtdC90YzRiNC1LCDRh9C10LwgNTAwMAoJewoJCSRwYXltZW50VG90YWwgPSAkcGF5bWVudFRvdGFsICsgJGNyZWRpdEJhbGFuY2U7IC8v0LLRgdC10LPQviDQvtGC0LTQsNC7INCx0LDQvdC60YMg0LTQviDRjdGC0L7Qs9C+ICsg0L7RgdGC0LDRgtC+0Log0L/QviDQutGA0LXQtNC40YLRgwoJCSRjcmVkaXRCYWxhbmNlID0gJGNyZWRpdEJhbGFuY2UgLSAkY3JlZGl0QmFsYW5jZTsgLy/Qt9C00LXRgdGMLCDQvdCw0LLQtdGA0L3QvtC1LCDQu9GD0YfRiNC1INC90LDQv9C40YHQsNGC0YwgJGNyZWRpdEJhbGFuY2UgPSAwCgkJYnJlYWs7Cgl9CgllbHNlCgl7CgkJJGNyZWRpdEJhbGFuY2UgPSAkY3JlZGl0QmFsYW5jZSAtICRtb250aGx5UGF5bWVudDsgLy/QstGL0YfQuNGC0LDQtdC8INC40Lcg0L7RgdGC0LDRgtC60LAg0L/QviDQutGA0LXQtNC40YLRgyA1MDAwCgkJJHBheW1lbnRUb3RhbCA9ICRwYXltZW50VG90YWwgKyAkbW9udGhseVBheW1lbnQ7IC8v0LLRgdC10LPQviDQvtGC0LTQsNC7INCx0LDQvdC60YMg0LTQviDRjdGC0L7Qs9C+ICsgNTAwMAoJfQp9CmVjaG8gInskcGF5bWVudFRvdGFsfSDQsdGD0LTQtdGCINC/0L7RgtGA0LDRh9C10L3QviDQvdCwINCQ0LnRhNC+0L0g0LfQsCB7JG1vbnRofSDQvNC10YHRj9GG0LXQsiI7