【模拟】[NOIP2011普及组]统计单词数
来源:互联网 发布:室内噪音检测软件 编辑:程序博客网 时间:2024/05/17 00:59
题目:[NOIP2011普及组]统计单词数 rqnoj661
题目描述
一般的文本编辑器都有查找单词的功能,该功能可以快速定位特定单词在文章中的位
置,有的还能统计出特定单词在文章中出现的次数。
现在,请你编程实现这一功能,具体要求是:给定一个单词,请你输出它在给定的文章
中出现的次数和第一次出现的位置。注意:匹配单词时,不区分大小写,但要求完全匹配,
即给定单词必须与文章中的某一独立单词在不区分大小写的情况下完全相同(参见样例1),
如果给定单词仅是文章中某一单词的一部分则不算匹配(参见样例2)。
【数据范围】
1 ≤ 单词长度≤ 10。
1 ≤ 文章长度≤ 1,000,000。
输入格式
第 1 行为一个字符串,其中只含字母,表示给定单词;
第 2 行为一个字符串,其中只可能包含字母和空格,表示给定的文章。
输出格式
只有一行,如果在文章中找到给定单词则输出两个整数,两个整数之间用一个空格隔开,
分别是单词在文章中出现的次数和第一次出现的位置(即在文章中第一次出现时,单词首字
母在文章中的位置,位置从0 开始);如果单词在文章中没有出现,则直接输出一个整数-1。
样例输入
样例输出
【输入输出样例 1 说明】
输出结果表示给定的单词 To 在文章中出现两次,第一次出现的位置为0。
【输入输出样例 2 说明】
表示给定的单词 to 在文章中没有出现,输出整数-1。
Pascal Code
program rqnoj661;var w,s:ansistring; num:longint; k:array[0..10000000] of longint;procedure init;begin assign(input,'rqnoj661.in'); assign(output,'rqnoj661.out'); reset(input); rewrite(output);end;procedure outit;begin close(input); close(output); halt;end;procedure xiao(var s:ansistring);var i:longint;begin for i:=1 to length(s) do begin if s[i] in ['a'..'z'] then continue; if s[i] in ['A'..'Z'] then begin s[i]:=chr(ord(s[i])+32); end; end;end;procedure readdata;begin readln(w); readln(s); xiao(w);//全部转换为小写 xiao(s);end;procedure main;var a:ansistring; i:longint;begin a:=''; for i:=1 to length(s) do begin if s[i]=' ' then begin if a=w then begin inc(num); k[num]:=i-length(w); end; a:=''; continue; end; a:=a+s[i]; end; if num=0 then begin writeln(-1); outit; end; writeln(num,' ',k[1]-1);end;begin init; readdata; main; outit;end.
- 【模拟】[NOIP2011普及组]统计单词数
- NOIP2011普及组统计单词数
- noip2011 统计单词数 (模拟)
- 【日常学习】【字符串处理】noip2011普及组第2题 统计单词数题解
- NOIP2011复赛普级组 统计单词数
- NOIP2011复赛普级组 统计单词数
- noip2011 统计单词数 T2题解
- 【模拟】[NOIP2011普及组]数字反转
- NOIP 2011 普及组 复赛 stat 统计单词数
- [noip 2011普及组No.2] 统计单词数
- 【NOIP2011普及组T4】表达式的值-模拟+栈
- Noip2011普及组
- NOIP2011 普及组题解
- 【NOIP2011模拟9.9】单词分类
- 【NOIP2011模拟9.20】统计方案
- NOIP2011普及组 瑞士轮
- 【NOIP2011普及组】瑞士轮
- NOIP2011普及组】瑞士轮
- 【模拟】ISBN号码
- 一个可供Swing测试用的JPanel类
- 【模拟】分数线划定
- 【模拟】[NOIP2011提高组]铺地毯
- 【模拟】[NOIP2011普及组]数字反转
- 【模拟】[NOIP2011普及组]统计单词数
- 【树】[NOIP2001]求先序排列
- 【并查集】家族
- 编码要一致
- 【并查集】mty的考验
- 【贪心】橘子结配
- 【贪心】[JSOI2007]奶酪
- 【贪心】排队接水
- 【贪心】删数问题