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

PD9waHAKZXJyb3JfcmVwb3J0aW5nKC0xKTsKCiRjcmVkaXRCYWxhbmNlID0gNDAwMDA7IC8q0JTQvtC70LMg0LDQvdC+0L3QsCDQv9C10YDQtdC0INCx0LDQvdC60L7QvCovCiRwZXJjZW50ID0gMS4wMzsgIC8q0L/RgNC+0YbQtdC90YIg0LXQttC10LzQtdGB0Y/Rh9C90YvQuSovCiRzZXJ2aWNlUGF5bWVudCA9IDEwMDA7IC8q0Lgg0LXRidC1INC60L7RgdCw0YDRjCDQutC+0LzQuNGB0YHQuNC4Ki8KJG1vbnRobHlQYXltZW50ID0gNTAwMDsgLyrQtdC20LXQvNC10YHRj9GH0L3Ri9C5INC/0LvQsNGC0LXQtiovCiRwYXltZW50VG90YWwgPTA7IC8q0YHQutC+0LvRjNC60L4g0L7RgtC00LDQuyDQsNC90L7QvSDQstGB0LXQs9C+Ki8KLyrQv9C+0YHRh9C40YLQsNC10Lwg0YDQsNGB0YXQvtC00YsqLwoKZm9yICgkbW9udGggPTE7ICRtb250aCA8PTIwOyAkbW9udGggKyspIHsgCiAgaWYgKCRjcmVkaXRCYWxhbmNlID4gJG1vbnRobHlQYXltZW50KSB7CiAgJGNyZWRpdEJhbGFuY2UgPSgkY3JlZGl0QmFsYW5jZSAqICRwZXJjZW50KSArICRzZXJ2aWNlUGF5bWVudCAtICRtb250aGx5UGF5bWVudDsKICAkcGF5bWVudFRvdGFsID0gJHBheW1lbnRUb3RhbCArICRtb250aGx5UGF5bWVudDt9CiAgZWxzZWlmICgkY3JlZGl0QmFsYW5jZSA8ICRtb250aGx5UGF5bWVudCl7IAogJGNyZWRpdEJhbGFuY2UgPSAoJGNyZWRpdEJhbGFuY2UqJHBlcmNlbnQpKyRzZXJ2aWNlUGF5bWVudDsKJG1vbnRobHlQYXltZW50ID0gJGNyZWRpdEJhbGFuY2U7CiRwYXltZW50VG90YWwgPSAkcGF5bWVudFRvdGFsICsgJG1vbnRobHlQYXltZW50OwokY3JlZGl0QmFsYW5jZSA9IDA7CiAgZWNobyAiKCRtb250aCkg0LzQtdGB0Y/RhiDRgdC/0YPRgdGC0Y86INC00L7Qu9CzID17JGNyZWRpdEJhbGFuY2V9INGA0YPQsSwg0LLRi9C/0LvQsNGH0LXQvdC+INCy0YHQtdCz0L4geyRwYXltZW50VG90YWx9INGA0YPQsVxuIjsgCiAgICAgICBicmVhazsKICAgfQogICBlY2hvICIoJG1vbnRoKSDQvNC10YHRj9GGINGB0L/Rg9GB0YLRjzog0LTQvtC70LMgPSB7JGNyZWRpdEJhbGFuY2V9INGA0YPQsSwg0LLRi9C/0LvQsNGH0LXQvdC+INCy0YHQtdCz0L4geyRwYXltZW50VG90YWx9INGA0YPQsVxuIjsKICAgZWNobyAiPGJyPiI7Cn0g