<?php
function HomoCredit($credit, $pay, $commission, $percent)
{
$tPay = 0;
for ($month = 1; $credit > 0; $month++) {
$debt = round($credit * $percent + $commission); if ($debt < $pay) {
$pay = $debt;
}
$credit = $debt - $pay;
$tPay += $pay;
}
return $tPay;
}
function SoftBank($credit, $pay, $commission, $percent)
{
$tPay = 0;
for ($month = 1; $credit > 0; $month++) {
$debt = round($credit * $percent + $commission); if ($debt < $pay) {
$pay = $debt;
}
$credit = $debt - $pay;
$tPay += $pay;
}
return $tPay;
}
function StrawberryBank ($credit, $pay, $commission, $percent)
{
$tPay = 0;
$open = 7777;
$credit = $credit + $open;
for ($month = 1; $credit > 0; $month++) {
$debt = round($credit * $percent + $commission); if ($debt < $pay) {
$pay = $debt;
}
$credit = $debt - $pay;
$tPay += $pay;
}
return $tPay;
}
$HomoCredit = HomoCredit(39999, 5000, 500, 1.04);
$SoftBank = SoftBank(39999, 5000, 1000, 1.03);
$StrawberryBank = StrawberryBank(39999, 5000, 0, 1.02);
echo "\nHomoCredit: $HomoCredit руб.";
echo "\nSoftBank: $SoftBank руб.";
echo "\nStrawberryBank: $StrawberryBank руб.";
PD9waHAKZnVuY3Rpb24gSG9tb0NyZWRpdCgkY3JlZGl0LCAkcGF5LCAkY29tbWlzc2lvbiwgJHBlcmNlbnQpCnsKICAgICR0UGF5ID0gMDsKICAgIGZvciAoJG1vbnRoID0gMTsgJGNyZWRpdCA+IDA7ICRtb250aCsrKSB7CiAgICAgICAgJGRlYnQgPSByb3VuZCgkY3JlZGl0ICogJHBlcmNlbnQgKyAkY29tbWlzc2lvbik7CiAgICAgICAgaWYgKCRkZWJ0IDwgJHBheSkgewogICAgICAgICAgICAkcGF5ID0gJGRlYnQ7CiAgICAgICAgfQogICAgICAgICRjcmVkaXQgPSAkZGVidCAtICRwYXk7CiAgICAgICAgJHRQYXkgKz0gJHBheTsKICAgIH0KICAgIHJldHVybiAkdFBheTsKfQoKZnVuY3Rpb24gU29mdEJhbmsoJGNyZWRpdCwgJHBheSwgJGNvbW1pc3Npb24sICRwZXJjZW50KQp7CiAgICAkdFBheSA9IDA7CiAgICBmb3IgKCRtb250aCA9IDE7ICRjcmVkaXQgPiAwOyAkbW9udGgrKykgewogICAgICAgICRkZWJ0ID0gcm91bmQoJGNyZWRpdCAqICRwZXJjZW50ICsgJGNvbW1pc3Npb24pOwogICAgICAgIGlmICgkZGVidCA8ICRwYXkpIHsKICAgICAgICAgICAgJHBheSA9ICRkZWJ0OwogICAgICAgIH0KICAgICAgICAkY3JlZGl0ID0gJGRlYnQgLSAkcGF5OwogICAgICAgICR0UGF5ICs9ICRwYXk7CiAgICB9CiAgICByZXR1cm4gJHRQYXk7Cn0KCmZ1bmN0aW9uIFN0cmF3YmVycnlCYW5rICgkY3JlZGl0LCAkcGF5LCAkY29tbWlzc2lvbiwgJHBlcmNlbnQpCnsKICAgICR0UGF5ID0gMDsKICAgICRvcGVuID0gNzc3NzsKICAgICRjcmVkaXQgPSAkY3JlZGl0ICsgJG9wZW47CiAgICBmb3IgKCRtb250aCA9IDE7ICRjcmVkaXQgPiAwOyAkbW9udGgrKykgewogICAgICAgICRkZWJ0ID0gcm91bmQoJGNyZWRpdCAqICRwZXJjZW50ICsgJGNvbW1pc3Npb24pOwogICAgICAgIGlmICgkZGVidCA8ICRwYXkpIHsKICAgICAgICAgICAgJHBheSA9ICRkZWJ0OwogICAgICAgIH0KICAgICAgICAkY3JlZGl0ID0gJGRlYnQgLSAkcGF5OwogICAgICAgICR0UGF5ICs9ICRwYXk7CiAgICB9CiAgICByZXR1cm4gJHRQYXk7Cn0KCiRIb21vQ3JlZGl0ID0gSG9tb0NyZWRpdCgzOTk5OSwgNTAwMCwgNTAwLCAxLjA0KTsKJFNvZnRCYW5rID0gU29mdEJhbmsoMzk5OTksIDUwMDAsIDEwMDAsIDEuMDMpOwokU3RyYXdiZXJyeUJhbmsgPSBTdHJhd2JlcnJ5QmFuaygzOTk5OSwgNTAwMCwgMCwgMS4wMik7CmVjaG8gIlxuSG9tb0NyZWRpdDogJEhvbW9DcmVkaXQg0YDRg9CxLiI7CmVjaG8gIlxuU29mdEJhbms6ICRTb2Z0QmFuayDRgNGD0LEuIjsKZWNobyAiXG5TdHJhd2JlcnJ5QmFuazogJFN0cmF3YmVycnlCYW5rINGA0YPQsS4iOw==