**题目4
函数ReadDat()实现从文件IN.DAT中读取一篇英文文章存入到字符串数组xx中，请编制函数StrOL()，其函数的功能是：以行为单位对行中以空格或标点符号为分隔的所有单词进行倒排。最后把已处理的字符串(应不含标点符号)仍按行重新存入字符串数组xx中，最后调用函数writeDat()把结果xx输出到文件OUT6.DAT中。
例如：原文：You He Me
I am a student.
结果：Me He You
student a am I
原始数据文件存放的格式是：每行的宽度均小于80个字符，含标点符号和空格。
部分源程序存在文件prog1.c中。
请勿改动主函数main()、读数据函数ReadDat()和输出数据函数writeDat()的内容。
#include
#include
#include
#include
char xx[50][80];
int maxline=0;/*文章的总行数*/
int ReadDat(void);
void WriteDat(void);
/*在无忧及捷成版模拟系统中都通过测试(输入文件句末有标点的在输出文件中句前有空格*/
void StrOL(void)
{ int i,j,k,s,m,strl;
char str[80];
for(i=0;i
{ strl=strlen(xx[i]);
memset(str,0,80); /*初始化这字符串数组str*/
s=k=0;
for(j=strl-1;j>=0;j--) /*从当前字符串尾部开始向前倒序循环，实现题意要求的倒排*/
{ if(isalpha(xx[i][j])) k++; /*如果当前字符是字母a~z或A~Z,则k加一*/
else { for(m=1;m<=k;m++) /*否则将长度为k的单词顺序存入到字符串数组str中，s值加1*/
str[s++]=xx[i][j+m];
k=0; /*将k值清0,以方便下一个单词的长度计数*/
}
if(!isalpha(xx[i][j])) str[s++]=' '; /*如果当前字符不是字母a~z或A~Z,则以空格代之存入到字符串数组str中，s值加一*/
}
for(m=1;m<=k;m++) /*此时的k值为当前字符串中第一个单词的长度，但在上一个for循环中没能存入到字符串数组str中，所以在这里将其存入到str中*/
str[s++]=xx[i][j+m];
str[s]='\0'; /*在当前行尾加0以标记此行的结束*/
strcpy(xx[i],str); /*将倒排好的当前字符串重新存回到当前行xx中*/
}
}
void main()
{
clrscr();
if(ReadDat()){
printf(“数据文件IN.DAT不能打开!\n\007”);
return;
}
StrOL();
WriteDat();
}
int ReadDat(void)
{
FILE *fp;
int i=0;
char *p;
if((fp=fopen(“IN.DAT”,“r”))==NULL) return 1;
while(fgets(xx[i],80,fp)!=NULL){
p=strchr(xx[i],'\n‘);
if(p)*p=0;
i++;
}
maxline=i;
fclose(fp);
return 0;
}
void WriteDat(void)
{
FILE *fp;
int i;
clrscr();
fp=fopen(“OUT6.DAT”,“w”);
for(i=0;i
printf(“%s\n”,xx[i]);
fprintf(fp,“%s\n”,xx[i]);
}
fclose(fp);
}
捷成版模拟系统中的解法
void StrOL(void)
{
int i, j ;
char word[21], yy[80], zz[80], *p ;
for(i = 0 ; i < maxline ; i++) {
p = xx[i] ;
j = 0 ;
memset(word, 0, 21) ;
memset(yy, 0, 80) ;
while(*p) {
if(isalpha(*p)) {
word[j++] = *p++ ;
if(*p) continue ;
}
strcpy(zz, yy) ;
sprintf(yy, “%s %s”, word, zz) ;
j = 0 ;
memset(word, 0, 21) ;
while(*p && (!isalpha(*p))) p++ ;
}
strcpy(xx[i], yy) ;
}
}
另一解法()：
/*在无忧及捷成版模拟系统中都通过测试(输入文件句末有标点的在输出文件中句前有空格*/
void StrOL(void)
{ int i,j,m;
char str[80];
for(i=0;i
{ m=strlen(xx[i]);
memset(str,0,80);
for(j=m-1;j>=0;j--)
if(!isalpha(xx[i][j]))
{ strcat(str,xx[i]+j+1);
strcat(str,“ ”);
xx[i][j]='\0';
}
strcat(str,xx[i]);
strcpy(xx[i],str);
}
}
实际上机考试时上面几种解法都可以采用。