<?php
error_reporting(-1);
$period = 20;
$credit = 40000;
$stavka = 0.03;
$payment = 5000;
$komissiya = 1000;
$totalPayment = 0;
$ostatok = 0;
 
for ($period = 1; $period < 40; $period++){
    $credit = $credit + ($credit * $stavka) - $payment + $komissiya;
    $totalPayment = $totalPayment + $payment;
    echo $period . " месяц кредита, " . "В этом месяце кредит составил " . round($credit) . ", " . "Всего было выплачено уже: " . $totalPayment . "<br>";
 
    if (0 < $credit && $credit < 5000)
    {
        $period++;
        $credit = $credit + ($credit * $stavka) - $payment + $komissiya;
        $totalPayment = $totalPayment + $payment;
        echo $period . " месяц кредита, " . "В этом месяце кредит составил " . round($credit) . ", " . "Всего было выплачено уже: " . $totalPayment . "<br>";
        echo "Остаток кредита " . round($credit);
        $lastPay = ($credit + ($credit * 0.03) + $komissiya - $payment) + $payment;
        $totalPayment = $totalPayment + $lastPay;
        echo "<br> Последний платеж был " . round(abs($lastPay)) . "<br>Всего выплачено было " . round($totalPayment);
        break;
    }
 
    if ($credit < 0){
        echo "Платеж завершен!";
        break;
    }
}
 
?>

Cjw/cGhwCmVycm9yX3JlcG9ydGluZygtMSk7CiRwZXJpb2QgPSAyMDsKJGNyZWRpdCA9IDQwMDAwOwokc3RhdmthID0gMC4wMzsKJHBheW1lbnQgPSA1MDAwOwoka29taXNzaXlhID0gMTAwMDsKJHRvdGFsUGF5bWVudCA9IDA7CiRvc3RhdG9rID0gMDsKCmZvciAoJHBlcmlvZCA9IDE7ICRwZXJpb2QgPCA0MDsgJHBlcmlvZCsrKXsKICAgICRjcmVkaXQgPSAkY3JlZGl0ICsgKCRjcmVkaXQgKiAkc3RhdmthKSAtICRwYXltZW50ICsgJGtvbWlzc2l5YTsKICAgICR0b3RhbFBheW1lbnQgPSAkdG90YWxQYXltZW50ICsgJHBheW1lbnQ7CiAgICBlY2hvICRwZXJpb2QgLiAiINC80LXRgdGP0YYg0LrRgNC10LTQuNGC0LAsICIgLiAi0JIg0Y3RgtC+0Lwg0LzQtdGB0Y/RhtC1INC60YDQtdC00LjRgiDRgdC+0YHRgtCw0LLQuNC7ICIgLiByb3VuZCgkY3JlZGl0KSAuICIsICIgLiAi0JLRgdC10LPQviDQsdGL0LvQviDQstGL0L/Qu9Cw0YfQtdC90L4g0YPQttC1OiAiIC4gJHRvdGFsUGF5bWVudCAuICI8YnI+IjsKCiAgICBpZiAoMCA8ICRjcmVkaXQgJiYgJGNyZWRpdCA8IDUwMDApCiAgICB7CiAgICAgICAgJHBlcmlvZCsrOwogICAgICAgICRjcmVkaXQgPSAkY3JlZGl0ICsgKCRjcmVkaXQgKiAkc3RhdmthKSAtICRwYXltZW50ICsgJGtvbWlzc2l5YTsKICAgICAgICAkdG90YWxQYXltZW50ID0gJHRvdGFsUGF5bWVudCArICRwYXltZW50OwogICAgICAgIGVjaG8gJHBlcmlvZCAuICIg0LzQtdGB0Y/RhiDQutGA0LXQtNC40YLQsCwgIiAuICLQkiDRjdGC0L7QvCDQvNC10YHRj9GG0LUg0LrRgNC10LTQuNGCINGB0L7RgdGC0LDQstC40LsgIiAuIHJvdW5kKCRjcmVkaXQpIC4gIiwgIiAuICLQktGB0LXQs9C+INCx0YvQu9C+INCy0YvQv9C70LDRh9C10L3QviDRg9C20LU6ICIgLiAkdG90YWxQYXltZW50IC4gIjxicj4iOwogICAgICAgIGVjaG8gItCe0YHRgtCw0YLQvtC6INC60YDQtdC00LjRgtCwICIgLiByb3VuZCgkY3JlZGl0KTsKICAgICAgICAkbGFzdFBheSA9ICgkY3JlZGl0ICsgKCRjcmVkaXQgKiAwLjAzKSArICRrb21pc3NpeWEgLSAkcGF5bWVudCkgKyAkcGF5bWVudDsKICAgICAgICAkdG90YWxQYXltZW50ID0gJHRvdGFsUGF5bWVudCArICRsYXN0UGF5OwogICAgICAgIGVjaG8gIjxicj4g0J/QvtGB0LvQtdC00L3QuNC5INC/0LvQsNGC0LXQtiDQsdGL0LsgIiAuIHJvdW5kKGFicygkbGFzdFBheSkpIC4gIjxicj7QktGB0LXQs9C+INCy0YvQv9C70LDRh9C10L3QviDQsdGL0LvQviAiIC4gcm91bmQoJHRvdGFsUGF5bWVudCk7CiAgICAgICAgYnJlYWs7CiAgICB9CgogICAgaWYgKCRjcmVkaXQgPCAwKXsKICAgICAgICBlY2hvICLQn9C70LDRgtC10LYg0LfQsNCy0LXRgNGI0LXQvSEiOwogICAgICAgIGJyZWFrOwogICAgfQp9Cgo/Pg==