fork download
copy 
  1. /*Во многих серьезных документах принято писать денежные суммы цифрами и прописью, вот так: «триста двадцать шесть (326)
  2. рублей», «две тысячи один (2001) рубль». Давай избавим людей от рутинной работы, и поручим склонение слов роботам и
  3. языку PHP.
  4.  
  5. Дана сумма, находящаяся в банке на счету, в рублях. Вывести ее в текстовом виде вроде "шестнадцать миллионов десять
  6. тысяч три (16010003) рубля".
  7. */
  8. <?php
  9. //mb_internal_encoding("utf-8");
  10. error_reporting(-1);
  11. function word($number, $words) //Возвращает "рубль", "рубля" или "рублей"
  12. {
  13.     $number %= 10;
  14.     if ($number == 1) {
  15.         return $words[0];
  16.     } elseif ($number >= 2 && $number < 5) {
  17.         return $words[1];
  18.     } else {
  19.         return $words[2];
  20.     }
  21. }
  22.  
  23. function toWords($number, $numbers) //Проверяет сотни, десятки и единицы и возвращает их, если они != 0
  24. {
  25.     $resultExp = "";
  26.     $hundred = intval(floor($number / 100) * 100);
  27.     $tensAndUnits = $number % 100;
  28.     $units = $tensAndUnits % 10;
  29.     if ($hundred != 0 && $hundred > 99) {
  30.         $resultExp .= " " . $numbers[$hundred];
  31.     }
  32.     if ($tensAndUnits != 0) {
  33.         if ($tensAndUnits <= 20 && $tensAndUnits > 9) {//Если число в этом диапазоне, то нет необходимости писать единицы
  34.             $resultExp .= " " . $numbers[$tensAndUnits];
  35.         } else{ 
  36.             $tens = intval(floor($tensAndUnits / 10)) * 10;
  37.             if($tens != 0){
  38.                 $resultExp .= " " . $numbers[$tens];
  39.             }
  40.             if ($units != 0) {
  41.                 $resultExp .= " " . $numbers[$units];
  42.             }
  43.         }
  44.     }
  45.     return $resultExp;
  46. }
  47. //Числа прописью
  48. $numbers = [1 => "один", "два", "три", "четыре", "пять", "шесть", "семь", "восемь", "девять", "десять",
  49.     "одиннадцать", "двенадцать", "тринадцать", "четырнадцать", "пятнадцать", "шестнадцать", "семнадцать", "восемнадцать", "девятнадцать",
  50.     "двадцать", 30 => "тридцать", 40 => "сорок", 50 => "пятьдесят", 60 => "шестьдесят", 70 => "семьдесят", 80 => "восемьдесят", 90 => "девяносто",
  51.     100 => "сто", 200 => "двести", 300 => "триста", 400 => "четыреста", 500 => "пятьсот", 600 => "шесьтсот", 700 => "семьсот", 800 => "восемьсот", 900 => "девятьсот"];
  52.  
  53. //Первый элемент при 1, 2-ой при 2-4, 3 при остальных
  54. $thousands = ["тысяча", "тысячи", "тысяч"];
  55. $millions = ["миллион", "миллиона", "миллионов"];
  56. $billions = ["миллиард", "миллиарда", "миллиардов"];
  57. $rubles = ["рубль", "рубля", "рублей"];
  58. $number = 999011012;
  59.  
  60. $resultExp = "";//Здесь хранится результат
  61.  
  62. while ($number >= 1) {
  63.     $i = strlen((string)$number);//Считаем количество цифр 
  64.     $denomination = [];//В зависимости от количества цифр здесь будут хранится тысячи, миллионы или миллиарды
  65.     if ($i >= 4) {
  66.         if ($i >= 4 && $i < 7) {
  67.             $denomination = $thousands;
  68.         } elseif ($i >= 7 && $i < 10) {
  69.             $denomination = $millions;
  70.         } else {
  71.             $denomination = $billions;
  72.         }
  73.         if ($i % 3 == 0) {
  74.             $threeDigits = intval(floor($number / pow(10, $i - 3)));//Получаем первые 3 цифры
  75.             $number = intval(floor($number % pow(10, $i - 3)));//Из исходного чила убираем первые 3 цифры
  76.             $resultExp .= toWords($threeDigits, $numbers);
  77.             $resultExp .= " " . word($threeDigits, $denomination);
  78.         } elseif ($i % 3 == 2) {
  79.             $firstTwoDigit = intval(floor($number / pow(10, $i - 2)));//Получаем первые 2 цифры
  80.             $number = intval(floor($number % pow(10, $i - 2)));//Из исходного чила убираем первые 2 цифры
  81.             $resultExp .= toWords($firstTwoDigit, $numbers);
  82.             $resultExp .= " " .  word($firstTwoDigit, $denomination);
  83.         } else {
  84.             $firstDigit = intval(floor($number / pow(10, $i - 1)));//Получаем первую цифру
  85.             $number = intval(floor($number % (pow(10, $i - 1))));//Из исходного чила убираем первую цифру
  86.             $resultExp .= toWords($firstDigit, $numbers);
  87.             $resultExp .= " " . word($firstDigit, $denomination);
  88.         }
  89.     } else {
  90.         $resultExp .= toWords($number, $numbers);
  91.         $resultExp .= " " . word($number, $rubles);
  92.         break;//Выходим из цикла, т.к. уже расписали все цифры
  93.     }
  94. }
  95. //Заменяем на женский род
  96. $resultExp = preg_replace("/один\sтысяча/u", "одна тысяча", $resultExp);
  97. $resultExp = preg_replace("/два\sтысячи/u", "две тысячи", $resultExp);
  98. echo "Result: " . $resultExp . "\n";
  99. ?>
Success #stdin #stdout 0.01s 82624KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
/*Во многих серьезных документах принято писать денежные суммы цифрами и прописью, вот так: «триста двадцать шесть (326)
рублей», «две тысячи один (2001) рубль». Давай избавим людей от рутинной работы, и поручим склонение слов роботам и
языку PHP.

Дана сумма, находящаяся в банке на счету, в рублях. Вывести ее в текстовом виде вроде "шестнадцать миллионов десять
тысяч три (16010003) рубля".
*/
Result:  девятьсот девяносто девять миллионов одиннадцать тысяча двенадцать рубля
https://ideone.com/YtpKrI
language:
PHP (php 7.3.5)
created:
5 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!