| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 735 人关注过本帖
标题:请高手指点~...南开三级上机题我运行了但得不到结果??
只看楼主 加入收藏
xcm
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2006-12-11
收藏
 问题点数:0 回复次数:2 
请高手指点~...南开三级上机题我运行了但得不到结果??

/*
函数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 <stdio.h>
#include <string.h>
#include <conio.h>
#include <ctype.h>

char xx[50][80];
int maxline=0;/*文章的总行数*/

int ReadDat(void);
void WriteDat(void);

void StrOL(void)
{
int i,j,k,m=0,sta,end,len;
char a[80];
for(i=0;i<maxline;i++)
{
len=strlen(xx[i]);
end=len-1;
for(j=len-1;j>=0;j--)
if ((xx[i][j]>='A'&&xx[i][j]<='Z')||(xx[i][j]>='a'&&xx[i][j]<='z')||xx[i][j]==' ')
{
sta=j;
for(k=m;k<end-sta;k++,sta++)
a[k]=xx[i][sta+1];
a[k+1]=' ';
m=k+2;
end=j-1;
}
for(j=0;a[j]!='\0';j++)
xx[i][j]=a[j];
}
}

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<maxline;i++){
printf("%s\n",xx[i]);
fprintf(fp,"%s\n",xx[i]);
}
fclose(fp);
}
/*所求程序已加蓝色*/

搜索更多相关主题的帖子: 南开 上机 结果 得不到 
2007-03-02 22:19
I喜欢c
Rank: 10Rank: 10Rank: 10
等 级:贵宾
威 望:64
帖 子:1749
专家分:0
注 册:2007-3-2
收藏
得分:0 
什么三级哦~~
考这?

 我是指针,却丢失了目标地址!          我是循环,却缺少了结束条件!      我是函数,却没有人来调用!   
2007-03-02 22:42
xcm
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2006-12-11
收藏
得分:0 
三级网络的呢。。
2007-03-03 07:37
快速回复:请高手指点~...南开三级上机题我运行了但得不到结果??
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.046877 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved