《2021文学研究助手+数据结构程序设计》由会员分享，可在线阅读，更多相关《2021文学研究助手+数据结构程序设计（6页珍藏版）》请在金锄头文库上搜索。
1、文学研究助手+数据结构程序设计问题描述：文字研究人员需要统计某篇英文小说中某些特定单词的出现次数和位置，试写出一个实现这一目标的文字统计系统。这称为“文学研究助手”。算法输入：文本文件和词集。算法输出：单词出现的次数，出现位置所在行的行号（同一行出现两次的只输出一个行号）。Input输入第一行为小说的文件名（包含路径的文本文件名）；第二行为一个正整数n，表示要查找单词的个数（nOutput输出共有n块，每块中第一行为查找的单词，从第二行开始为找到的各行的行号和列号，每个行号和列号占一行，若在同一行上出现多次，则只输出一个行号和多个列号并占一行，输出顺序按行号从小到大顺序排列。若没有找到则块内只
2、输出第一行的单词即可。Sample Inpute:1.txt41110ababc12345endSample Output1110row=1,col=10row=2,col=3,11ababcrow=1,col=1912345endrow=3,col=1文件内容为：abcdefg 11110 ababababcaw11100011111000abcend以下是我写的程序，实现了问题的要求，愿与有共同兴趣的人一起探讨。#include #include #define MAXSTRLEN 255 /最大串长typedef char SStringMAXSTRLEN+1; /串的定长顺序存储表示，
3、0号单元存放串的长度int nextMAXSTRLEN; /KMP算法中用到的nextvoid get_next(SString T,int next) /求next值int j=1,k=0;next1=0;while(jif(k=0|Tk=Tj)+j;+k;if(Tj!=Tk) nextj=k;else nextj=nextk;else k=nextk;int Index(SString S,SString T,int pos) /KMP算法int i=pos,j=1;while(iif(j=0|Si=Tj) +i;+j;elsej=nextj;if (jT0) return (i-T0);
4、elsereturn 0;int lenth(SString str) /求串长int i=1;while(stri) i+;return(i-1);void find(char name,SString keys) /查找函数，该函数是整个程序的重要部分，对于输入的每一个 /要查找的关键字，从小说文件中逐行读取字符串查找SString text; /存放从小说文件读取的一行字符串int i=1,j=0,k; /i用于存放行号，j用于存放列号,k用于输出格式的控制FILE *fp;if (!(fp=(fopen(name,r) /打开小说文件printf(Open file error!n);
5、exit(0);keys0=lenth(keys); /求关键字的长度get_next(keys,next); /求模式串（关键字）每一个字符对应的next 值printf(%sn,&keys1); /打印关键字while (!feof(fp) /如果还没到小说文件末尾k=0;fgets(&text1,MAXSTRLEN,fp); /从小说文件中读取一行字符串，存入text串中text0=lenth(text); /求读入的串的长度j=Index(text,keys,j+1); /调用KMP算法，统计关键字在该行出现的位置，若匹配不成功则返回0if (j!=0)printf(row=%d,co
6、l=%d,i,j); k+; /若匹配成功则打印行号和列号 while(j!=0) /若该行找到了关键字，则继续寻找看是否还能匹配成功j=Index(text,keys,j+1); /调用KMP算法从刚找到的列号后一字符起匹配 if (j!=0)printf(,%d,j); /若匹配成功，则打印列号i+; /行号加1，在下一行中寻找if (k) printf(n); /输出格式控制void main()char name50; /存储输入的小说路径字符串SString words10; /定义字符串数组，用于存储输入的关键字int n,i;printf(Please input the name of the novel:n);scanf(%s,name);printf(How many words do you want to find?(nscanf(%d,&n);printf(Please input the words you want to find:n);for (i=0;iscanf(%s,&wordsi1); /用户一次性输入要查找的关键字，wordsi0用于存放字符串的长度for (i=0;ifind(name,wordsi); /对于每一个关键字，调用查找函数进行查找统计
