<?php
 
//Задание: определить наиболее выгодный кредит
 
function getCreditTotalPayment ($credit, $procent, $comission, $paymentOnce, $payOut)
{
    $totalPayment = 0;     
    $credit += $paymentOnce; 
    $creditBalance = $credit; //Баланс на 0 период равен сумме кредита и стоимости открытия счета
 
    for ($month=1; $creditBalance > 0; $month++) { 
        $creditBalance = $creditBalance * $procent + $comission;
        if ($creditBalance < $payOut) { //Если баланс меньше ежемесчного погашения, 
            $payOut = $creditBalance;   //то сумма последнего платежа равна остатку долга
        }
        $creditBalance -= $payOut;      //Гасим кредит
        $totalPayment += $payOut;       //Подсчитывавем сколько уже заплатили банку
        if ($creditBalance>=$credit){           //Если кредитный баланс после первой итерации стала больше чем была до этого, 
            $totalPayment = "Не выплачиваемый"; //то Анон не сможет выплатить кредит с такой суммой ежемесчного погашения, 
            break;                              //т.е. цикл не закончится, поэтому прерываем
        }
    }
    return $totalPayment; //Всего заплатит Анон
}
 
$payOut = 5000;  //Ежемесчный платеж Анона
$credit = 39999; //Сумма кредита
 
//Условия кредита:  процентная ставка, ежемесячная плата за обслуживание, платеж за открытие счета
$homoCreditTotal = getCreditTotalPayment ($credit, 1.04, 500, 0, $payOut); 
$softBankCreditTotal = getCreditTotalPayment ($credit, 1.03, 1000, 0, $payOut); 
$strawberryBankCredit = getCreditTotalPayment ($credit, 1.02, 0, 7777, $payOut); 
 
echo "HomoCredit: {$homoCreditTotal} руб.\n";
echo "SoftBankCredit: {$softBankCreditTotal} руб.\n";
echo "StrawberryBankCredit: {$strawberryBankCredit} руб.\n";
?>

PD9waHAKCi8v0JfQsNC00LDQvdC40LU6INC+0L/RgNC10LTQtdC70LjRgtGMINC90LDQuNCx0L7Qu9C10LUg0LLRi9Cz0L7QtNC90YvQuSDQutGA0LXQtNC40YIKCmZ1bmN0aW9uIGdldENyZWRpdFRvdGFsUGF5bWVudCAoJGNyZWRpdCwgJHByb2NlbnQsICRjb21pc3Npb24sICRwYXltZW50T25jZSwgJHBheU91dCkKewogICAgJHRvdGFsUGF5bWVudCA9IDA7ICAgICAKICAgICRjcmVkaXQgKz0gJHBheW1lbnRPbmNlOyAKICAgICRjcmVkaXRCYWxhbmNlID0gJGNyZWRpdDsgLy/QkdCw0LvQsNC90YEg0L3QsCAwINC/0LXRgNC40L7QtCDRgNCw0LLQtdC9INGB0YPQvNC80LUg0LrRgNC10LTQuNGC0LAg0Lgg0YHRgtC+0LjQvNC+0YHRgtC4INC+0YLQutGA0YvRgtC40Y8g0YHRh9C10YLQsAogICAgCiAgICBmb3IgKCRtb250aD0xOyAkY3JlZGl0QmFsYW5jZSA+IDA7ICRtb250aCsrKSB7IAogICAgICAgICRjcmVkaXRCYWxhbmNlID0gJGNyZWRpdEJhbGFuY2UgKiAkcHJvY2VudCArICRjb21pc3Npb247CiAgICAgICAgaWYgKCRjcmVkaXRCYWxhbmNlIDwgJHBheU91dCkgeyAvL9CV0YHQu9C4INCx0LDQu9Cw0L3RgSDQvNC10L3RjNGI0LUg0LXQttC10LzQtdGB0YfQvdC+0LPQviDQv9C+0LPQsNGI0LXQvdC40Y8sIAogICAgICAgICAgICAkcGF5T3V0ID0gJGNyZWRpdEJhbGFuY2U7ICAgLy/RgtC+INGB0YPQvNC80LAg0L/QvtGB0LvQtdC00L3QtdCz0L4g0L/Qu9Cw0YLQtdC20LAg0YDQsNCy0L3QsCDQvtGB0YLQsNGC0LrRgyDQtNC+0LvQs9CwCiAgICAgICAgfQogICAgICAgICRjcmVkaXRCYWxhbmNlIC09ICRwYXlPdXQ7ICAgICAgLy/Qk9Cw0YHQuNC8INC60YDQtdC00LjRggogICAgICAgICR0b3RhbFBheW1lbnQgKz0gJHBheU91dDsgICAgICAgLy/Qn9C+0LTRgdGH0LjRgtGL0LLQsNCy0LXQvCDRgdC60L7Qu9GM0LrQviDRg9C20LUg0LfQsNC/0LvQsNGC0LjQu9C4INCx0LDQvdC60YMKICAgICAgICBpZiAoJGNyZWRpdEJhbGFuY2U+PSRjcmVkaXQpeyAgICAgICAgICAgLy/QldGB0LvQuCDQutGA0LXQtNC40YLQvdGL0Lkg0LHQsNC70LDQvdGBINC/0L7RgdC70LUg0L/QtdGA0LLQvtC5INC40YLQtdGA0LDRhtC40Lgg0YHRgtCw0LvQsCDQsdC+0LvRjNGI0LUg0YfQtdC8INCx0YvQu9CwINC00L4g0Y3RgtC+0LPQviwgCiAgICAgICAgICAgICR0b3RhbFBheW1lbnQgPSAi0J3QtSDQstGL0L/Qu9Cw0YfQuNCy0LDQtdC80YvQuSI7IC8v0YLQviDQkNC90L7QvSDQvdC1INGB0LzQvtC20LXRgiDQstGL0L/Qu9Cw0YLQuNGC0Ywg0LrRgNC10LTQuNGCINGBINGC0LDQutC+0Lkg0YHRg9C80LzQvtC5INC10LbQtdC80LXRgdGH0L3QvtCz0L4g0L/QvtCz0LDRiNC10L3QuNGPLCAKICAgICAgICAgICAgYnJlYWs7ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgLy/Rgi7QtS4g0YbQuNC60Lsg0L3QtSDQt9Cw0LrQvtC90YfQuNGC0YHRjywg0L/QvtGN0YLQvtC80YMg0L/RgNC10YDRi9Cy0LDQtdC8CiAgICAgICAgfQogICAgfQogICAgcmV0dXJuICR0b3RhbFBheW1lbnQ7IC8v0JLRgdC10LPQviDQt9Cw0L/Qu9Cw0YLQuNGCINCQ0L3QvtC9Cn0KCiRwYXlPdXQgPSA1MDAwOyAgLy/QldC20LXQvNC10YHRh9C90YvQuSDQv9C70LDRgtC10LYg0JDQvdC+0L3QsAokY3JlZGl0ID0gMzk5OTk7IC8v0KHRg9C80LzQsCDQutGA0LXQtNC40YLQsAoKLy/Qo9GB0LvQvtCy0LjRjyDQutGA0LXQtNC40YLQsDogINC/0YDQvtGG0LXQvdGC0L3QsNGPINGB0YLQsNCy0LrQsCwg0LXQttC10LzQtdGB0Y/Rh9C90LDRjyDQv9C70LDRgtCwINC30LAg0L7QsdGB0LvRg9C20LjQstCw0L3QuNC1LCDQv9C70LDRgtC10LYg0LfQsCDQvtGC0LrRgNGL0YLQuNC1INGB0YfQtdGC0LAKJGhvbW9DcmVkaXRUb3RhbCA9IGdldENyZWRpdFRvdGFsUGF5bWVudCAoJGNyZWRpdCwgMS4wNCwgNTAwLCAwLCAkcGF5T3V0KTsgCiRzb2Z0QmFua0NyZWRpdFRvdGFsID0gZ2V0Q3JlZGl0VG90YWxQYXltZW50ICgkY3JlZGl0LCAxLjAzLCAxMDAwLCAwLCAkcGF5T3V0KTsgCiRzdHJhd2JlcnJ5QmFua0NyZWRpdCA9IGdldENyZWRpdFRvdGFsUGF5bWVudCAoJGNyZWRpdCwgMS4wMiwgMCwgNzc3NywgJHBheU91dCk7IAoKZWNobyAiSG9tb0NyZWRpdDogeyRob21vQ3JlZGl0VG90YWx9INGA0YPQsS5cbiI7CmVjaG8gIlNvZnRCYW5rQ3JlZGl0OiB7JHNvZnRCYW5rQ3JlZGl0VG90YWx9INGA0YPQsS5cbiI7CmVjaG8gIlN0cmF3YmVycnlCYW5rQ3JlZGl0OiB7JHN0cmF3YmVycnlCYW5rQ3JlZGl0fSDRgNGD0LEuXG4iOwo/Pg==