fork(1) download
copy 
  1. <?php
  2.  
  3. error_reporting(-1);
  4. mb_internal_encoding('UTF-8');
  5.  
  6. $number = mt_rand(0,9999999);
  7.     $spelling = array(
  8.         0   =>  'ноль',                                     10  =>  'десять',       100 =>  'сто',
  9.         1   =>  'один',         11  =>  'одиннадцать',      20  =>  'двадцать',     200 =>  'двести',
  10.         2   =>  'два',          12  =>  'двенадцать',       30  =>  'тридцать',     300 =>  'триста',
  11.         3   =>  'три',          13  =>  'тринадцать',       40  =>  'сорок',        400 =>  'четыреста',
  12.         4   =>  'четыре',       14  =>  'четырнадцать',     50  =>  'пятьдесят',    500 =>  'пятьсот',
  13.         5   =>  'пять',         15  =>  'пятнадцать',       60  =>  'шестьдесят',   600 =>  'шестьсот',
  14.         6   =>  'шесть',        16  =>  'шестнадцать',      70  =>  'семьдесят',    700 =>  'семьсот',    
  15.         7   =>  'семь',         17  =>  'семнадцать',       80  =>  'восемьдесят',   800 =>  'восемьсот',
  16.         8   =>  'восемь',       18  =>  'восемнадцать',     90  =>  'девяносто',     900 =>  'девятьсот',
  17.         9   =>  'девять',       19  =>  'девятнадцать'    
  18.     );
  19.     $femaleSpelling = array(
  20.         1   =>  'одна',        2   =>  'две'
  21.     );
  22.     $menSpelling = array(
  23.         1   =>  'один',        2   =>  'два'
  24.     );
  25.     $roubles = array(
  26.     	'рубль' => array(1),
  27.     	'рубля' => array(2, 3, 4),
  28.     	'рублей' => array(0, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 30, 40, 50, 60, 70, 80, 90, 100, 200, 300, 400, 500, 600, 700, 800, 900)
  29.     	);
  30.     $thousands = array(
  31.     	'тысяча' => array(1),
  32.     	'тысячи' => array(2, 3, 4),
  33.     	'тысяч' => array(0, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 30, 40, 50, 60, 70, 80, 90, 100, 200, 300, 400, 500, 600, 700, 800, 900)
  34.     	);
  35.     $millions = array(
  36.     	'миллион' => array(1),
  37.     	'миллиона' => array(2, 3, 4),
  38.     	'миллионов' => array(0, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 30, 40, 50, 60, 70, 80, 90, 100, 200, 300, 400, 500, 600, 700, 800, 900)
  39.     	);
  40.  
  41. function findMatch($num, $spelling) {
  42. 	$result = 0;
  43. foreach ($spelling as $numbers => $numbersInWords) {
  44.     if ($num == $numbers) {
  45.     	$result = $numbersInWords;
  46.     	return $result;
  47.     }
  48. } 
  49. }
  50.  
  51. function getRoubles($num, $roubles) {
  52. foreach ($roubles as $forms => $numerals) {
  53.     foreach ($numerals as $array => $numeral) {
  54.     	if ($num == $numeral) {
  55.     	return $forms;
  56.     	}
  57.     }	
  58. } 
  59. }
  60. function threeNumeralsToText($num, $number, $spelling, $roubles, $i, $x, $femaleSpelling) {
  61. 	foreach ($spelling as $numbers => $numbersInWords) {
  62.         if ($num == $numbers) { // Если число соответствует иммеющимс в массиве $spelling - выводим их и форму рублей.
  63.     	$result = $numbersInWords;
  64.     	$rouble = getRoubles($num, $roubles);
  65.     	$i++;
  66.         } 
  67. 	}
  68.         if ($i > 0) {
  69.         	$numeralsInWords = $result.' '.$rouble;
  70.  
  71.         } else {
  72.     	$firstNumeral = floor($num / 100); //находим первое число в сотне
  73.     	$hundred = $firstNumeral * 100;
  74.     	$num = $hundred;
  75.         $hundredInWords = findMatch($num, $spelling);
  76.         $ten = $number - $hundred; // Получаем десятки
  77.         $num = $ten;
  78.         if ($num == 0) {
  79. 	    } else {
  80. 	         foreach ($spelling as $numbers => $numbersInWords) {
  81.                  if ($num == $numbers) {
  82.     	         $result = $numbersInWords;
  83.     	         if ($num == 1) {
  84.         	           $result = findMatch($num, $femaleSpelling);
  85.                    }
  86.                    if ($num == 2) {
  87.         	           $result = findMatch($num, $femaleSpelling);
  88.                    }
  89.     	         $rouble = getRoubles($num, $roubles);
  90.     	         $x++;
  91.     	        } 
  92.              } 
  93. 	    }
  94.              if ($x > 0) {
  95.              	$numeralsInWords = $hundredInWords.' '.$result.' '.$rouble;
  96.              } else {
  97.              	   $tenWithoutOne = floor(($number - $hundred) / 10) * 10;
  98.              	   $num = $tenWithoutOne;
  99.              	   $tenWithoutOneInWords = findMatch($num, $spelling);
  100.               	   $one = $number - ($hundred + $tenWithoutOne);
  101.              	   $num = $one;
  102.              	   $oneInWords = findMatch($num, $spelling);
  103.              	   if ($num == 1) {
  104.         	           $oneInWords = findMatch($num, $femaleSpelling);
  105.                    }
  106.                    if ($num == 2) {
  107.         	           $oneInWords = findMatch($num, $femaleSpelling);
  108.                    }
  109.              	   $rouble = getRoubles($num, $roubles);
  110.              	   $numeralsInWords = $hundredInWords.' '.$tenWithoutOneInWords.' '.$oneInWords.' '.$rouble;
  111.              }
  112.        }
  113.     return $numeralsInWords; 
  114. }
  115. function twoNumeralsToText($num, $number, $spelling, $roubles, $i, $x, $femaleSpelling) {
  116. 	foreach ($spelling as $numbers => $numbersInWords) {
  117.         if ($num == $numbers) { // Если число соответствует иммеющимс в массиве $spelling - выводим их и форму рублей.
  118.     	$result = $numbersInWords;
  119.     	if ($num == 1) {
  120.         	$result = findMatch($num, $femaleSpelling);
  121.             }
  122.             if ($num == 2) {
  123.         	$result = findMatch($num, $femaleSpelling);
  124.             }
  125.     	$rouble = getRoubles($num, $roubles);
  126.     	$i++;
  127.         } 
  128. 	}
  129.         if ($i > 0) {
  130.         	$numeralsInWords = $result.' '.$rouble;
  131.         } else {
  132.     	$firstNumeral = floor($num / 10); //находим первое число в десятке
  133.     	$ten = $firstNumeral * 10;
  134.     	$num = $ten;
  135.         $tenInWords = findMatch($num, $spelling);
  136.         $one = $number - $ten;
  137.         $num = $one;
  138.         $oneInWords = findMatch($num, $spelling);
  139.         $result = $oneInWords;
  140.             if ($num == 1) {
  141.         	$oneInWords = findMatch($num, $femaleSpelling);
  142.             }
  143.             if ($num == 2) {
  144.         	$oneInWords = findMatch($num, $femaleSpelling);
  145.             }
  146.         $rouble = getRoubles($num, $roubles);
  147.         $numeralsInWords = $tenInWords.' '.$oneInWords.' '.$rouble;
  148.         }
  149.         return $numeralsInWords;
  150. }
  151. function oneNumeralToText($num, $number, $spelling, $roubles, $femaleSpelling) {
  152. 	foreach ($spelling as $numbers => $numbersInWords) {
  153.         if ($num == $numbers) { // Если число соответствует иммеющимс в массиве $spelling - выводим их и форму рублей.
  154.     	$result = $numbersInWords;
  155.     	$rouble = getRoubles($num, $roubles);
  156.     	if ($num == 1) {
  157.         	$result = findMatch($num, $femaleSpelling);
  158.             }
  159.             if ($num == 2) {
  160.         	$result = findMatch($num, $femaleSpelling);
  161.             }
  162.         } 
  163. 	} 
  164. 	$numeralsInWords = $result.' '.$rouble;
  165. 	  return $numeralsInWords;
  166. } 
  167. $text = strval($number);
  168. $count = mb_strlen($text);
  169. $num = $number;
  170. $i = 0;
  171. $x = 0;
  172. if ($count == 7) {
  173. 	$firstNumeral = floor($num / 1000000);
  174. 	$num = $firstNumeral;
  175. 	$firstNumeralInWords = findMatch($num, $spelling);
  176.     $million = getRoubles($num, $millions);
  177. 	/*Ищет ноль в начале следующей тройки чисел*/
  178. 	$nextNumeral = floor(($number - ($firstNumeral * 1000000)) / 1000);
  179. 	if ($nextNumeral == 0) {
  180. 		$million = getRoubles($firstNumeral, $millions);
  181. 		$numeralsInWords = $firstNumeralInWords.' '.$million.' '.$rouble;
  182. 	} else {
  183. 		$text = strval($nextNumeral);
  184.         $threeNumerals = mb_strlen($text);
  185.         $temporary = $number;
  186.         $num = $nextNumeral;
  187.         $number = $nextNumeral;
  188.         if ($threeNumerals == 3) {
  189.         	$threeNumeralsInWords = threeNumeralsToText($num, $number, $spelling, $thousands, $i, $x, $femaleSpelling);
  190.         	$number = $temporary;
  191.         	$general = $threeNumeralsInWords;
  192.             $numeralsInWords = $firstNumeralInWords.' '.$million.' '.$threeNumeralsInWords;
  193.         }
  194.         if ($threeNumerals == 2) {
  195.         	$twoNumeralsInWords = twoNumeralsToText($num, $number, $spelling, $thousands, $i, $x, $menSpelling);
  196.         	$number = $temporary;
  197.         	$general = $twoNumeralsInWords;
  198.             $numeralsInWords = $firstNumeralInWords.' '.$million.' '.$twoNumeralsInWords;
  199.         }
  200.         if ($threeNumerals == 1) {
  201.         	$oneNumeralInWords = oneNumeralToText($num, $number, $spelling, $thousands, $i, $x, $menSpelling);
  202.         	$number = $temporary;
  203.         	$general = $oneNumeralInWords;
  204.             $numeralsInWords = $firstNumeralInWords.' '.$million.' '.$oneNumeralInWords;
  205.         }
  206. 	}
  207. 	$threeLastNumerals = $number - (($firstNumeral * 1000000) + ($nextNumeral * 1000));
  208. 	if ($threeLastNumerals == 0) {
  209. 		$rouble = getRoubles($nextNumeral, $roubles);
  210. 		$number = $temporary;
  211. 		if ($threeLastNumerals != $nextNumeral) {
  212. 			$numeralsInWords = $firstNumeralInWords.' '.$million.' '.$general.' '.$rouble;
  213. 		}
  214. 		if ($threeLastNumerals == $nextNumeral) {
  215. 			$numeralsInWords = $firstNumeralInWords.' '.$million.' '.$rouble;
  216. 		}
  217.  
  218. 	} else {
  219. 		$text = strval($threeLastNumerals);
  220.         $threeNumerals = mb_strlen($text);
  221.         $num = $threeLastNumerals;
  222.         $temporary = $number;
  223.         $number = $threeLastNumerals;
  224.         if ($threeNumerals == 3) {
  225.         	$threeNumeralsInWords = threeNumeralsToText($num, $number, $spelling, $roubles, $i, $x, $menSpelling);
  226.         	$number = $temporary;
  227.         	if ($nextNumeral != 0) {
  228.             $numeralsInWords = $firstNumeralInWords.' '.$million.' '.$general.' '.$threeNumeralsInWords;
  229. 		    }
  230. 		    if ($nextNumeral == 0) {
  231. 			$numeralsInWords = $firstNumeralInWords.' '.$million.' '.$threeNumeralsInWords;
  232. 		    }
  233.         }
  234.         if ($threeNumerals == 2) {
  235.         	$twoNumeralsInWords = twoNumeralsToText($num, $number, $spelling, $roubles, $i, $x, $menSpelling);
  236.         	$number = $temporary;
  237.         	if ($nextNumeral != 0) {
  238.             $numeralsInWords = $firstNumeralInWords.' '.$million.' '.$general.' '.$twoNumeralsInWords;
  239. 		    }
  240. 		    if ($nextNumeral == 0) {
  241. 			$numeralsInWords = $firstNumeralInWords.' '.$million.' '.$twoNumeralsInWords;
  242. 		    }
  243.         }
  244.         if ($threeNumerals == 1) {
  245.         	$oneNumeralInWords = oneNumeralToText($num, $number, $spelling, $roubles, $menSpelling);
  246.             if ($nextNumeral != 0) {
  247.             $number = $temporary;
  248.             $numeralsInWords = $firstNumeralInWords.' '.$million.' '.$general.' '.$oneNumeralInWords;
  249. 		    }
  250. 		    if ($nextNumeral == 0) {
  251. 		    $number = $temporary;
  252. 			$numeralsInWords = $firstNumeralInWords.' '.$million.' '.$oneNumeralInWords;
  253. 		    }
  254.         }
  255. 	}
  256. }	
  257. if ($count == 6) {
  258. 	$threeNumerals = floor($num / 1000);
  259. 	$num = $threeNumerals;
  260. 	$temporary = $number;
  261. 	$number = $threeNumerals;
  262. 	$threeNumeralsToText = threeNumeralsToText($num, $number, $spelling, $thousands, $i, $x, $femaleSpelling);
  263. 	/*Ищет ноль в начале следующей тройки чисел*/
  264. 	$nextNumeral = $temporary - ($threeNumerals * 1000);
  265. 	if ($nextNumeral == 0) {
  266. 		$rouble = getRoubles($nextNumeral, $roubles);
  267. 		$number = $temporary;
  268. 		$numeralsInWords = $threeNumeralsToText.' '.$rouble;
  269. 	} else {
  270. 		$text = strval($nextNumeral);
  271.         $threeNumerals = mb_strlen($text);
  272.         $num = $nextNumeral;
  273.         $number = $nextNumeral;
  274.         if ($threeNumerals == 3) {
  275.         	$threeNumeralsInWords = threeNumeralsToText($num, $number, $spelling, $roubles, $i, $x, $menSpelling);
  276.         	$number = $temporary;
  277.             $numeralsInWords = $threeNumeralsToText.' '.$threeNumeralsInWords;
  278.         }
  279.         if ($threeNumerals == 2) {
  280.         	$twoNumeralsInWords = twoNumeralsToText($num, $number, $spelling, $roubles, $i, $x, $menSpelling);
  281.         	$number = $temporary;
  282.             $numeralsInWords = $threeNumeralsToText.' '.$twoNumeralsInWords;
  283.         }
  284.         if ($threeNumerals == 1) {
  285.         	$oneNumeralInWords = oneNumeralToText($num, $number, $spelling, $roubles, $menSpelling);
  286.             $number = $temporary;
  287.             $numeralsInWords = $threeNumeralsToText.' '.$oneNumeralInWords;
  288.         }
  289. 	}
  290. }	
  291. if ($count == 5) {
  292. 	$twoNumerals = floor($num / 1000);
  293. 	$num = $twoNumerals;
  294. 	$temporary = $number;
  295. 	$number = $twoNumerals;
  296. 	$thousandsInWords = twoNumeralsToText($num, $number, $spelling, $thousands, $i, $x, $femaleSpelling);
  297. 	/*Ищет ноль в начале следующей тройки чисел*/
  298. 	$nextNumeral = $temporary - ($twoNumerals * 1000);
  299. 	if ($nextNumeral == 0) {
  300. 		$rouble = getRoubles($nextNumeral, $roubles);
  301. 		$number = $temporary;
  302. 		$numeralsInWords = $thousandsInWords.' '.$rouble;
  303. 	} else {
  304. 		$text = strval($nextNumeral);
  305.         $threeNumerals = mb_strlen($text);
  306.         $num = $nextNumeral;
  307.         $number = $nextNumeral;
  308.         if ($threeNumerals == 3) {
  309.         	$threeNumeralsInWords = threeNumeralsToText($num, $number, $spelling, $roubles, $i, $x);
  310.         	$number = $temporary;
  311.             $numeralsInWords = $thousandsInWords.' '.$threeNumeralsInWords;
  312.         }
  313.         if ($threeNumerals == 2) {
  314.         	$twoNumeralsInWords = twoNumeralsToText($num, $number, $spelling, $roubles, $i, $x, $menSpelling);
  315.         	$number = $temporary;
  316.             $numeralsInWords = $thousandsInWords.' '.$twoNumeralsInWords;
  317.         }
  318.         if ($threeNumerals == 1) {
  319.         	$oneNumeralInWords = oneNumeralToText($num, $number, $spelling, $roubles, $menSpelling);
  320.             $number = $temporary;
  321.             $numeralsInWords = $thousandsInWords.' '.$oneNumeralInWords;
  322.         }
  323. 	}
  324. }	
  325. if ($count == 4) {
  326. 	$firstNumeral = floor($num / 1000);
  327. 	$num = $firstNumeral;
  328. 	$firstNumeralInWords = findMatch($num, $spelling);
  329. 	    if ($num == 1) {
  330.         	$firstNumeralInWords = findMatch($num, $femaleSpelling);
  331.         }
  332.         if ($num == 2) {
  333.         	$firstNumeralInWords = findMatch($num, $femaleSpelling);
  334.         }
  335.     $thousand = getRoubles($num, $thousands);
  336. 	/*Ищет ноль в начале следующей тройки чисел*/
  337. 	$nextNumeral = $number - ($firstNumeral * 1000);
  338. 	if ($nextNumeral == 0) {
  339. 		$rouble = getRoubles($nextNumeral, $roubles);
  340. 		$numeralsInWords = $firstNumeralInWords.' '.$thousand.' '.$rouble;
  341. 	} else {
  342. 		$text = strval($nextNumeral);
  343.         $threeNumerals = mb_strlen($text);
  344.         $temporary = $number;
  345.         $num = $nextNumeral;
  346.         $number = $nextNumeral;
  347.         if ($threeNumerals == 3) {
  348.         	$threeNumeralsInWords = threeNumeralsToText($num, $number, $spelling, $roubles, $i, $x, $menSpelling);
  349.         	$number = $temporary;
  350.             $numeralsInWords = $firstNumeralInWords.' '.$thousand.' '.$threeNumeralsInWords;
  351.         }
  352.         if ($threeNumerals == 2) {
  353.         	$twoNumeralsInWords = twoNumeralsToText($num, $number, $spelling, $roubles, $i, $x, $menSpelling);
  354.         	$number = $temporary;
  355.             $numeralsInWords = $firstNumeralInWords.' '.$thousand.' '.$twoNumeralsInWords;
  356.         }
  357.         if ($threeNumerals == 1) {
  358.         	$oneNumeralInWords = oneNumeralToText($num, $number, $spelling, $roubles, $i, $x, $menSpelling);
  359.         	$number = $temporary;
  360.             $numeralsInWords = $firstNumeralInWords.' '.$thousand.' '.$oneNumeralInWords;
  361.         }
  362. 	}
  363. }	
  364. if ($count == 3) {
  365.     $numeralsInWords = threeNumeralsToText($num, $number, $spelling, $roubles, $i, $x, $menSpelling);
  366.  
  367. }
  368. if ($count == 2) {
  369. 	$numeralsInWords = twoNumeralsToText($num, $number, $spelling, $roubles, $i, $x, $menSpelling);
  370. }
  371. if ($count == 1) {
  372.     $numeralsInWords = oneNumeralToText($num, $number, $spelling, $roubles, $menSpelling);
  373. }        
  374.  
  375. echo "На счету \"$number руб.\" или \"$numeralsInWords\".";
Success #stdin #stdout 0.05s 52480KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
На счету "8103619 руб." или "восемь миллионов сто три тысячи шестьсот девятнадцать рублей".
https://ideone.com/7bSfev
language:
PHP (php 7.3.5)
created:
8 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!