fork download 
  1. <?php
  2. error_reporting(-1);
  3. mb_internal_encoding('utf-8');
  4.  
  5. $isFemale=0;
  6.  
  7. function smallNumberToText($number, $isFem) {
  8.  
  9.     $spelling = array(
  10.  
  11.         0   =>  '',                                     10  =>  'десять',       100 =>  'сто',
  12.  
  13.         1   =>  'один',         11  =>  'одиннадцать',      20  =>  'двадцать',     200 =>  'двести',
  14.  
  15.         2   =>  'два',          12  =>  'двенадцать',       30  =>  'тридцать',     300 =>  'триста',
  16.  
  17.         3   =>  'три',          13  =>  'тринадцать',       40  =>  'сорок',        400 =>  'четыреста',
  18.  
  19.         4   =>  'четыре',       14  =>  'четырнадцать',     50  =>  'пятьдесят',    500 =>  'пятьсот',
  20.  
  21.         5   =>  'пять',         15  =>  'пятнадцать',       60  =>  'шестьдесят',   600 =>  'шестьсот',
  22.  
  23.         6   =>  'шесть',        16  =>  'шестнадцать',      70  =>  'семьдесят',    700 =>  'семьсот',    
  24.  
  25.         7   =>  'семь',         17  =>  'семнадцать',       80  =>  'восемьдесят',   800 =>  'восемьсот',
  26.  
  27.         8   =>  'восемь',       18  =>  'восемнадцать',     90  =>  'девяносто',     900 =>  'девятьсот',
  28.  
  29.         9   =>  'девять',       19  =>  'девятнадцать'    
  30.  
  31.     );
  32.  
  33.  
  34.     $femaleSpelling = array(
  35.  
  36.         1   =>  'одна',        2   =>  'две'
  37.  
  38.     );
  39.  
  40. if ((($number==1) || ($number)==2) && ($isFem==1))
  41. echo $femaleSpelling[$number]." ";
  42. else
  43. echo $spelling[$number]." ";
  44.  
  45. }
  46.  
  47.  
  48. function numberToText($number) {//разбивает число на сотни/тысячи/миллионы и передает в функцию отсылающую значение в smallNumberToText
  49.  
  50.     $len=strlen($number);
  51.     if ($len<=3)
  52.         {$GLOBALS['isFemale']=0;
  53.          nameIt($number);}
  54.  
  55.     elseif ($len>3 && $len<=6)
  56.     {
  57.         settype($number,"string");//этот пиздец
  58.         if ($number[strlen($number)-4]==1)//проверяет последние цифры
  59.         $GLOBALS['isFemale']=1;//тысяч
  60.         elseif($number[strlen($number)-4]==2) //и меняет
  61.         $GLOBALS['isFemale']=1;//род
  62.         else// на женский
  63.         $GLOBALS['isFemale']=0;
  64.         nameIt(floor($number/1000));
  65.  
  66.  
  67.         settype($number,"string");//этот пиздец
  68.         if ($number[strlen($number)-4]==1)//проверяет последние цифры
  69.         echo "тысяча ";//тысяч 
  70.         elseif($number[strlen($number)-4]==2)//и меняет 
  71.         echo "тысячи ";//"тысяч" на "тысячи"
  72.         else //в зависимости от рода 
  73.         {echo " тысяч ";
  74.         $GLOBALS['isFemale']=0;}
  75.         numberToText($number-(floor($number/1000))*1000);
  76.     }
  77.  
  78.     elseif ($len>6 && $len<=9)
  79.     {
  80.         nameIt(floor($number/1000000));
  81.         settype($number,"string");//этот пиздец 
  82.         if ($number[strlen($number)-7]==1)//проверяет последние цифры
  83.         echo " миллион ";//миллионов 
  84.         elseif ($number[strlen($number)-7]>=2 && $number[strlen($number)-7]<=4)//и выбирает 
  85.         echo " миллиона ";//нужную форму
  86.         else 
  87.         echo " миллионов ";
  88.         numberToText($number-(floor($number/1000000))*1000000);
  89.         $GLOBALS['isFemale']=0;
  90.     }
  91.     else die("ERROR! length=$len");
  92.  
  93. }   
  94.  
  95.  
  96. function nameIt($value)//передает значения в smallNumberToText с учетом исключений 
  97. {
  98.  
  99.     $len=strlen($value);
  100.     $A=(string)$value;
  101.     switch ($len)
  102.     {
  103.         case "3": 
  104.             smallNumberToText($A[0]*100,$GLOBALS['isFemale']); 
  105.             if (($A[1].$A[2])=="00") break;//100,200..900
  106.             if (($A[1].$A[2])>="10" && ($A[1].$A[2])<="19") {smallNumberToText($A[1].$A[2],$GLOBALS['isFemale']); break;}//11,12..19
  107.             smallNumberToText($A[1]*10,$GLOBALS['isFemale']); 
  108.             smallNumberToText($A[2],$GLOBALS['isFemale']); break;
  109.  
  110.         case "2": 
  111.             if (($A[0].$A[1])>="10" && ($A[0].$A[1])<="19") {smallNumberToText($A[0].$A[1],$GLOBALS['isFemale']); break;}//11,12..19
  112.             smallNumberToText($A[0]*10,$GLOBALS['isFemale']);
  113.             smallNumberToText($A[1],$GLOBALS['isFemale']); break;
  114.  
  115.         case "1": 
  116.             smallNumberToText($A[0],$GLOBALS['isFemale']); break;
  117.     }
  118.  
  119. }
  120.  
  121. function addRubles($value)
  122. {
  123.     $length=strlen($value);
  124.     settype($value,"string");
  125.     $lastNumber=$value[$length-2].$value[$length-1];  
  126.     if ($lastNumber>="02" && $lastNumber<="04")
  127.     echo " рубля.";
  128.     elseif ($lastNumber=="01")
  129.     echo " рубль.";
  130.     elseif (($lastNumber>="05" && $lastNumber<="09"))
  131.     echo " рублей.";
  132.     elseif ($lastNumber>="10" && $lastNumber<="20")
  133.     echo " рублей.";
  134.     elseif ($value[$length-1]=="1" && $value[$length-2]!="1")
  135.     echo " рубль.";
  136.     elseif (($value[$length-1]>="2" && $value[$length-1]<="4")&&($value[$length-2]!="2"||$value[$length-2]!="0"))
  137.     echo " рубля.";
  138.     else 
  139.     echo " рублей.";
  140.  
  141. }
  142.  
  143.  
  144. $amount1 = mt_rand(1,99999999);
  145. echo "На вашем счету ($amount1) ",numberToText($amount1),addRubles($amount1),"\n";
  146.  
  147. $amount2 = mt_rand(1,99999999);
  148. echo "На вашем счету ($amount2) ",numberToText($amount2),addRubles($amount2),"\n";
  149.  
  150. $amount3 = mt_rand(1,99999999);
  151. echo "На вашем счету ($amount3) ",numberToText($amount3),addRubles($amount3),"\n";
  152.  
  153. $amount4 = mt_rand(1,99999999);
  154. echo "На вашем счету ($amount4) ",numberToText($amount4),addRubles($amount4),"\n";
Success #stdin #stdout 0.01s 20520KB
comments (?)
stdin 
Standard input is empty
stdout 
На вашем счету (27710978) двадцать семь  миллионов семьсот десять  тысяч девятьсот семьдесят восемь  рублей.
На вашем счету (83290158) восемьдесят три  миллиона двести девяносто   тысяч сто пятьдесят восемь  рублей.
На вашем счету (7960445) семь  миллионов девятьсот шестьдесят   тысяч четыреста сорок пять  рублей.
На вашем счету (97386688) девяносто семь  миллионов триста восемьдесят шесть  тысяч шестьсот восемьдесят восемь  рублей.
https://ideone.com/8aocgi
language:
PHP (php 7.3.5)
created:
10 years ago
visibility:
secret

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!