费诺编码

#include<stdio.h>
#include<string.h>
#include<stdlib.h>
#define N 10
void fano();
void read();
void px();
int i,j=0,q;
float a[N],c=0,p=0;
char b[N][N];
void main()
{
void fano(int m,int j,float a[N]);
FILE *write;
write=fopen("2.txt","w");
a[0]=0.0;
fprintf(write,"排序前的概率为:");
read();
for(i=1;i<=j;i++)
{
fprintf(write,"%1.2f/t",a[i]);
}
fprintf(write,"/n");
fprintf(write,"排序后的概率为:");
px(i,j);
for(i=1;i<=j;i++)
{
fprintf(write,"%1.2f/t",a[i]);
}
fprintf(write,"/n");
fprintf(write,"费诺编码为:/n");
fano(1,j,a);
fprintf(write,"a/t概率/t编码/n");
for(i=1;i<=j;i++)
{
fprintf(write,"a[%d]/t%1.2f/t%s/n",i,a[i],b[i]);
}
}
//------------------------------------------------------------------------------------//
void read()
{
FILE *read;
read=fopen("1.txt","r");
for(i=1;i<N;i++)
{
fscanf(read,"%f/t",&a[i]);
p+=a[i];
j++;
if(p==1)
break;
}
}
void px(,int i,int j)//排序
{
for(i=1;i<j;i++)
{
for(q=1;q<=j;q++)
{
if(a[q]<a[q+1])
{
c=a[q];
a[q]=a[q+1];
a[q+1]=c;
}
}
}
}
//--------------------------------------------------------------------------//
void fano(int m,int j,float a[N])
{
int x;
float t1,t2=0.0,sum=0.0;
if(m==j)
{return;}
for(i=m;i<=j;i++)
{
sum+=a[i];
x=m;
}
do{
t1=t2;
t2=t2+a[x];
x++;
}while(t2<=sum-t2);
if((sum-2*t1)<=(2*t2-sum))x--;
for(i=m;i<x;i++)
strcat(b[i],"0");
for(i=x;i<=j;i++)
strcat(b[i],"1");
fano(m,x-1,a);
fano(x,j,a);
//-----------------------------------------------------------//
}