统计出现次数最多的3个单词

题目要求：使用c语言编程，统计出给定data.dat文件中的出现次数最多的
三个单词，以及这三个单词的出现的次数，计算程序运行的时间，结果写入result.dat中。

(注：这里不区分单词大小写，如he与He当做是同一单词计数)
本程序使用二叉排序树方式将所有单词放入树中然后在其中查找相同单词，出现相同的则把它的出现次数加1，否则继续在左右子树中查找。

最后使用数组将A[first]，A[second]，A[third]三个单词进行排序，并用这三个单词余剩余所有单词进行比较，不断更新，最后找到出现次数最多的三个单词，输出到文件中。

#include<stdio.h>
#include<stdlib.h>
#include<string.h>
#include<ctype.h>
#include<time.h>
#define MAX 20
typedef struct BTNode
{
char *word;
unsigned long count;
struct BTNode *lchild;
struct BTNode *rchild;
}BTNode;
struct words
{
char str[20]; //用来存放该单词
int num;
}A[7500000];
struct words a;
int k=0;
int sum=0;
void GetWord(FILE *fp,int lim,char word[])//获取一个单词
{
char *w=word;
char c;
while(isspace(c=getc(fp))); //跳过空格
if(c!=EOF)
c=tolower(c);
*word++=c;
if(!isalpha(c))//单词第一个不是字母，退出
{
*word='\0';
return ;
}
for( ;--lim>0;word++)
if(!isalnum(*word=getc(fp)))//不是字母或数字，退出
break;
*word='\0';
word=w;
}
BTNode *AddTree(BTNode *root,char *w) //建立二叉排序树
{
if(root==NULL)
{
root=(BTNode *)malloc(sizeof(BTNode)*1); //给二叉树分配空间
if(!root)
{
printf("No enough memory!\n");
exit(-1);
}
else
{
root->word=(char *)malloc(sizeof(char)*MAX);
if(!root->word)
{
printf("No enough memory!\n");
exit(-1);
}
}
strcpy(root->word,w);
root->count=1;
root->lchild=root->rchild=NULL;
}
else if(strcmp(w,root->word)==0) // 比较指针w所指单词与root->word指针所指字符是否一致
{
root->count++;
}
else if(strcmp(w,root->word)>0) //不相同时
root->rchild=AddTree(root->rchild,w); //在右子树插入单词，例如将student插在star的右子树
else
root->lchild=AddTree(root->lchild,w);
return root;
}
DTree(BTNode *root)//销毁二叉树
{
BTNode *p=root;
if(!p)
return;
DTree(p->lchild);
DTree(p->rchild);
free(p);
p=NULL;
}
void visit(BTNode *root)
{
A[k].num=root->count;
strcpy(A[k].str,root->word);
k++;
}
void trave(BTNode *root)
{
if(root!=NULL)
{
visit(root);
trave(root->lchild);
trave(root->rchild);
}
}
int main(int argc,char *argv[])
{
BTNode *root=NULL;
FILE *fp,*out;
int i,j;
struct words first,second,third;
char word[MAX];
double start,finish;
double duration;
start=clock();
printf("开始时间%1.10f\n", start);
fp=fopen("/home/local/c/data.dat","r");
out=fopen("/home/local/c/result.txt","w"); if(fp==NULL)
{
printf("Can not open the file1!\n");
exit(-1);
}
if(out==NULL)
{
printf("Can not open the file!\n");
exit(-1);
}
while(!feof(fp))
{
GetWord(fp,MAX,word);
if(isalpha(word[0]))//如果Word第一个是字母，则加入到二叉树中 {
root=AddTree(root,word);
sum++;
}
}
trave(root);
for(i=0;i<2;i++)
{
for(j=i+1;j<3;j++)
if(A[i].num<A[j].num)
{
a=A[i];
A[i]=A[j];
A[j]=a;
}
}
first=A[0];
second=A[1];
third=A[2];
for(i=3;i<sum;i++)
{
if(A[i].num>first.num)
{
third=second;
second=first;
first=A[i];
}
else if(A[i].num>second.num)
{
third=second;
second=A[i];
}
else if(A[i].num>third.num)
third=A[i];
}
fprintf(out,"%s,%d\n",first.str,first.num);
fprintf(out,"%s,%d\n",second.str,second.num);
fprintf(out,"%s,%d\n",third.str,third.num);
printf("%s,%s,%s",first.str,second.str,third.str); printf("%d,%d,%d",first.num,second.num,third.num); printf("\n");
finish=(double)clock();
duration=(double)(finish-start) / CLOCKS_PER_SEC; printf("结束时间%1.10f\n",finish);
printf("程序运行时间为%1.10fms\n",1000*duration); printf("The all words are: %d\n",sum);
fclose(fp);
fclose(out);
DTree(root);
return 0;
}。