Метод Шеннона Фано

#include <iostream>
#include <string>
#include <clocale>
using namespace std;
double P1[] = {     0.111,// Д
                     0.222,// И
                     0.111,// С
                     0.111, //Т
                     0.111, //А
                     0.111,// Н 
                     0.111,// Ц
                     0.222,// И
                     0.111 // Я
};
char Alpha[] ={          'Д',
                        'И', 
                        'С', 
                        'Т',
                        'А',
                        'Н',
                       'Ц', 
                        'И',
                       'Я' 
                     };
 
string* Res=new string[9];
 
double schet1=0;
double schet2=0;
 
 
void Sort()
{
for (int i = 0; i < 9; i++)
{
for (int j = 0; j < 9 - i - 1; j++)
{
if (P1[j] < P1[j + 1])
{
char temp2;
double temp1 = 0;
 
temp1 = P1[j];
temp2 = Alpha[j];
P1[j] = P1[j + 1];
Alpha[j] = Alpha[j + 1];
P1[j + 1] = temp1;
Alpha[j + 1] = temp2;
 
}
}
}
 
 
}
int m;
 
int Delenie_Posledovatelnosty(int L, int R)
{
 
schet1= 0;
for(int i=L;i<=R-1;i++)
{
schet1=schet1+P1[i];     
}
 
schet2=P1[R];                 
m= R;
while (schet1>=schet2 )
{
m=m-1;
schet1=schet1 - P1[m];
schet2=schet2+ P1[m];
}
return m;
 
 
}
int g = 0;
 
void Fano1(int L, int R);
 
void Fano(int L, int R)
{
int n;
 
if (L < R)
{
 
n = Delenie_Posledovatelnosty(L, R);
cout<<n<<endl;
for (int i = L; i <= R; i++)
{
if (i <= n)
{
Res[i] += '0';
}
else
{
Res[i] += '1';
}
}
 
 
 
Fano1(L, n);
 
Fano(n + 1, R);
 
}
 
 
}
 
void Fano1(int L, int R)
{
int n;
 
if (L < R)
{
 
n = Delenie_Posledovatelnosty(L, R);
cout<<n<<endl;
for (int i = L; i <= R; i++)
{
if (i <= n)
{
Res[i] += '0';
}
else
{
Res[i] += '1';
}
}
 
Fano(L, n);
 
Fano1(n + 1, R);
 
}
 
 
}
 
void main()
{
setlocale(LC_ALL,"Russian");
Sort();
 
Fano(0,8);
for (int i = 0; i < 9; i++)
{
 
 
cout<<Alpha[i] << " " << Res[i]<<endl;
system ("pause");
}
 
}