function Сумма_прописью(varr)
{
var rub        =         Math.floor(varr);
var kop        =         (varr-rub)*100;
var kop        =         Math.round(kop,2);
if (kop<10) kop="0"+kop;
return Число_до_миллиарда_прописью(rub) + " руб " + kop +" коп.";
}

function Число_до_миллиарда_прописью(varr)
{var summa="";
        if (varr<1000000000)
        {
        s_100000000	= Math.floor((varr/100000000));
        s_10000000  = Math.floor((varr-s_100000000*100000000)/10000000);
        s_1000000   = Math.floor((varr-s_100000000*100000000-s_10000000*10000000)/1000000);
        s_100000    = Math.floor((varr-s_100000000*100000000-s_10000000*10000000-s_1000000*1000000)/100000);
        s_10000     = Math.floor((varr-s_100000000*100000000-s_10000000*10000000-s_1000000*1000000-s_100000*100000)/10000);
        s_1000      = Math.floor((varr-s_100000000*100000000-s_10000000*10000000-s_1000000*1000000-s_100000*100000-s_10000*10000)/1000);
        s_100       = Math.floor((varr-s_100000000*100000000-s_10000000*10000000-s_1000000*1000000-s_100000*100000-s_10000*10000-s_1000*1000)/100);
        s_10        = Math.floor((varr-s_100000000*100000000-s_10000000*10000000-s_1000000*1000000-s_100000*100000-s_10000*10000-s_1000*1000-s_100*100)/10);
        s_1         = Math.floor((varr-s_100000000*100000000-s_10000000*10000000-s_1000000*1000000-s_100000*100000-s_10000*10000-s_1000*1000-s_100*100-s_10*10)/1);

        summa+=Сотни(s_100000000);

        if(s_10000000==1) summa+=" "+Ч11_19(s_10000000*10+s_100000)+" миллионов ";
                else{   summa+=" "+Десятки(s_10000000)+" "+Единицы_миллионов(s_1000000)+" ";
                		if ((s_1000000==0)&&(s_10000000>1)) summa+=" миллионов ";
                		if ((s_1000000==0)&&(s_10000000==0)&&(s_100000000>0)) summa+=" миллионов ";
             		}

        summa+=Сотни(s_100000);
        if(s_10000==1) 	summa+=" "+Ч11_19(s_10000*10+s_1000)+" тысяч ";
        else		{   summa+=" "+Десятки(s_10000)+" "+Единицы_тысяч(s_1000)+" ";
                		if ((s_1000==0)&&(s_10000>1)) summa+=" тысяч ";
                		if ((s_1000==0)&&(s_10000==0)&&(s_100000>0)) summa+=" тысяч ";
             		}
        summa+=Сотни(s_100);
        if(s_10==1)     summa+=" "+Ч11_19(s_10*10+s_1);
        else            summa+=" "+Десятки(s_10)+" "+Единицы(s_1);

		}
return summa;
}
function Ч11_19(ed_)
{
if (ed_==10) ret = "десять";
if (ed_==11) ret = "одиннадцать";
if (ed_==12) ret = "двенадцать";
if (ed_==13) ret = "тринадцать";
if (ed_==14) ret = "четырнадцать";
if (ed_==15) ret = "пятнадцать";
if (ed_==16) ret = "шестнадцать";
if (ed_==17) ret = "семьнадцать";
if (ed_==18) ret = "восемьнадцать";
if (ed_==19) ret = "девятнадцать";
return(ret);
}
function Единицы(ed_)
{
if (ed_==0) ret = "";
if (ed_==1) ret = "один";
if (ed_==2) ret = "два";
if (ed_==3) ret = "три";
if (ed_==4) ret = "четыре";
if (ed_==5) ret = "пять";
if (ed_==6) ret = "шесть";
if (ed_==7) ret = "семь";
if (ed_==8) ret = "восемь";
if (ed_==9) ret = "девять";
return(ret);
}

function Единицы_тысяч(ed_)
{
if (ed_==0) ret = "";
if (ed_==1) ret = "одна тысяча";
if (ed_==2) ret = "две тысячи";
if (ed_==3) ret = "три тысячи";
if (ed_==4) ret = "четыре тысячи";
if (ed_==5) ret = "пять тысяч";
if (ed_==6) ret = "шесть тысяч";
if (ed_==7) ret = "семь тысяч";
if (ed_==8) ret = "восемь тысяч";
if (ed_==9) ret = "девять тысяч";
return(ret);
}

function Единицы_миллионов(ed_)
{
if (ed_==0) ret = "";
if (ed_==1) ret = "один миллион";
if (ed_==2) ret = "два миллиона";
if (ed_==3) ret = "три миллиона";
if (ed_==4) ret = "четыре миллиона";
if (ed_==5) ret = "пять миллионов";
if (ed_==6) ret = "шесть миллионов";
if (ed_==7) ret = "семь миллионов";
if (ed_==8) ret = "восемь миллионов";
if (ed_==9) ret = "девять миллионов";
return(ret);
}

function Десятки(ed_)
{
if (ed_==0) ret = "";
if (ed_==1) ret = "";
if (ed_==2) ret = "двадцать";
if (ed_==3) ret = "тридцать";
if (ed_==4) ret = "сорок";
if (ed_==5) ret = "пятьдесят";
if (ed_==6) ret = "шестьдесят";
if (ed_==7) ret = "семьдесят";
if (ed_==8) ret = "восемьдесят";
if (ed_==9) ret = "девяносто";
return(ret);
}

function Сотни(ed)
{
if (ed==0) ret = "";
if (ed==1) ret = "сто";
if (ed==2) ret = "двести";
if (ed==3) ret = "триста";
if (ed==4) ret = "четыреста";
if (ed==5) ret = "пятьсот";
if (ed==6) ret = "шестьсот";
if (ed==7) ret = "семьсот";
if (ed==8) ret = "восемьсот";
if (ed==9) ret = "девятьсот";
return(ret);
}