<?php
function getCreditTotal($creditSum, $percent, $commission, $accountFee, $payout)
{
$debt = $creditSum + $accountFee; /* плата за счёт сразу увеличивает долг */
$total = 0;
$months = 0;
while ($debt > 0) {
/* 1. начисляем проценты и комиссию */
$debt = $debt * (1 + $percent) + $commission;
/* 2. платим не больше $payout за раз */
$payment = min($payout, $debt); $debt -= $payment;
$total += $payment;
$months++;
}
return array($total, $months); }
$creditSum = 40000;
$payout = 5000;
list($homoCreditTotal, $homoMonths) = getCreditTotal
($creditSum, 0.04, 500, 0, $payout); list($softbankTotal, $softMonths) = getCreditTotal
($creditSum, 0.03, 1000, 0, $payout); list($strawberryTotal, $strawMonths) = getCreditTotal
($creditSum, 0.02, 0, 7777, $payout);
echo "homoCredit: {$homoCreditTotal} руб. ({$homoMonths} мес.)\n";
echo "softbank: {$softbankTotal} руб. ({$softMonths} мес.)\n";
echo "strawberryBank: {$strawberryTotal} руб. ({$strawMonths} мес.)\n";
$best = min($homoCreditTotal, $softbankTotal, $strawberryTotal);
if ($best === $strawberryTotal) {
echo "Выгоднее всего: strawberryBank\n";
} elseif ($best === $homoCreditTotal) {
echo "Выгоднее всего: homoCredit\n";
} else {
echo "Выгоднее всего: softbank\n";
}
PD9waHAKZXJyb3JfcmVwb3J0aW5nKC0xKTsKZnVuY3Rpb24gZ2V0Q3JlZGl0VG90YWwoJGNyZWRpdFN1bSwgJHBlcmNlbnQsICRjb21taXNzaW9uLCAkYWNjb3VudEZlZSwgJHBheW91dCkKewokZGVidCA9ICRjcmVkaXRTdW0gKyAkYWNjb3VudEZlZTsgLyog0L/Qu9Cw0YLQsCDQt9CwINGB0YfRkdGCINGB0YDQsNC30YMg0YPQstC10LvQuNGH0LjQstCw0LXRgiDQtNC+0LvQsyAqLwokdG90YWwgPSAwOwokbW9udGhzID0gMDsKCndoaWxlICgkZGVidCA+IDApIHsKLyogMS4g0L3QsNGH0LjRgdC70Y/QtdC8INC/0YDQvtGG0LXQvdGC0Ysg0Lgg0LrQvtC80LjRgdGB0LjRjiAqLwokZGVidCA9ICRkZWJ0ICogKDEgKyAkcGVyY2VudCkgKyAkY29tbWlzc2lvbjsKCi8qIDIuINC/0LvQsNGC0LjQvCDQvdC1INCx0L7Qu9GM0YjQtSAkcGF5b3V0INC30LAg0YDQsNC3ICovCiRwYXltZW50ID0gbWluKCRwYXlvdXQsICRkZWJ0KTsKJGRlYnQgLT0gJHBheW1lbnQ7CiR0b3RhbCArPSAkcGF5bWVudDsKJG1vbnRocysrOwp9CgpyZXR1cm4gYXJyYXkoJHRvdGFsLCAkbW9udGhzKTsKfQoKJGNyZWRpdFN1bSA9IDQwMDAwOwokcGF5b3V0ID0gNTAwMDsKCmxpc3QoJGhvbW9DcmVkaXRUb3RhbCwgJGhvbW9Nb250aHMpID0gZ2V0Q3JlZGl0VG90YWwoJGNyZWRpdFN1bSwgMC4wNCwgNTAwLCAwLCAkcGF5b3V0KTsKbGlzdCgkc29mdGJhbmtUb3RhbCwgJHNvZnRNb250aHMpID0gZ2V0Q3JlZGl0VG90YWwoJGNyZWRpdFN1bSwgMC4wMywgMTAwMCwgMCwgJHBheW91dCk7Cmxpc3QoJHN0cmF3YmVycnlUb3RhbCwgJHN0cmF3TW9udGhzKSA9IGdldENyZWRpdFRvdGFsKCRjcmVkaXRTdW0sIDAuMDIsIDAsIDc3NzcsICRwYXlvdXQpOwoKZWNobyAiaG9tb0NyZWRpdDogeyRob21vQ3JlZGl0VG90YWx9INGA0YPQsS4gKHskaG9tb01vbnRoc30g0LzQtdGBLilcbiI7CmVjaG8gInNvZnRiYW5rOiB7JHNvZnRiYW5rVG90YWx9INGA0YPQsS4gKHskc29mdE1vbnRoc30g0LzQtdGBLilcbiI7CmVjaG8gInN0cmF3YmVycnlCYW5rOiB7JHN0cmF3YmVycnlUb3RhbH0g0YDRg9CxLiAoeyRzdHJhd01vbnRoc30g0LzQtdGBLilcbiI7CgokYmVzdCA9IG1pbigkaG9tb0NyZWRpdFRvdGFsLCAkc29mdGJhbmtUb3RhbCwgJHN0cmF3YmVycnlUb3RhbCk7CgppZiAoJGJlc3QgPT09ICRzdHJhd2JlcnJ5VG90YWwpIHsKZWNobyAi0JLRi9Cz0L7QtNC90LXQtSDQstGB0LXQs9C+OiBzdHJhd2JlcnJ5QmFua1xuIjsKfSBlbHNlaWYgKCRiZXN0ID09PSAkaG9tb0NyZWRpdFRvdGFsKSB7CmVjaG8gItCS0YvQs9C+0LTQvdC10LUg0LLRgdC10LPQvjogaG9tb0NyZWRpdFxuIjsKfSBlbHNlIHsKZWNobyAi0JLRi9Cz0L7QtNC90LXQtSDQstGB0LXQs9C+OiBzb2Z0YmFua1xuIjsKfQ==