测试结果2: 通过本测试点|有效耗时62ms
测试结果3: 通过本测试点|有效耗时63ms
测试结果4: 通过本测试点|有效耗时62ms
测试结果5: 测试结果错误.错误结果为:1 163
正确结果应为:31 163
测试结果6: 输出过少|用户输出数据少于标准输出的50%[标准输出7位|选手输出2位]
测试结果7: 输出过少|用户输出数据少于标准输出的50%[标准输出6位|选手输出2位]
测试结果8: 输出过少|用户输出数据少于标准输出的50%[标准输出8位|选手输出2位]
测试结果9: 测试结果错误.错误结果为:1 45
正确结果应为:2794 45
测试结果10: 输出过少|用户输出数据少于标准输出的50%[标准输出8位|选手输出2位]
通过本测试点|有效耗时188ms
测试结果2: 通过本测试点|有效耗时62ms
测试结果3: 通过本测试点|有效耗时63ms
测试结果4: 通过本测试点|有效耗时62ms
测试结果5: 测试结果错误.错误结果为:1 163
正确结果应为:31 163
测试结果6: 输出过少|用户输出数据少于标准输出的50%[标准输出7位|选手输出2位]
测试结果7: 输出过少|用户输出数据少于标准输出的50%[标准输出6位|选手输出2位]
测试结果8: 输出过少|用户输出数据少于标准输出的50%[标准输出8位|选手输出2位]
测试结果9: 测试结果错误.错误结果为:1 45
正确结果应为:2794 45
测试结果10: 输出过少|用户输出数据少于标准输出的50%[标准输出8位|选手输出2位]
program xx;
var s1:string;
s,b:string;
i,j,k,t,p,q:longint;
m:boolean;
begin
readln(s);
readln(s1);
for i:=1 to length(s) do
if (ord(s[i])<91) and (ord(s[i])>64) then
s[i]:=chr(ord(s[i])+32);
for i:=1 to length(s1) do
if (ord(s1[i])<91) and (ord(s1[i])>64) then
s1[i]:=chr(ord(s1[i])+32);
p:=length(s);
q:=length(s1);
t:=q+1;
for i:=1 to q-p+1 do
begin
b:=copy(s1,i,p);
m:=false;
if i=1 then
if (s1[i+p]=' ') then
m:=true;
if (i>1) and (i<q-p+1) then
if (s1[i+p]=' ') and (s1[i-1]=' ') then
m:=true;
if i=q-p+1 then
if (s1[i-1]=' ') then
m:=true;
if (s=b) and m then inc(k);
if (i<t) and (s=b) and m then t:=i;
end;
if k=0
then writeln('-1')
else write(k,' ',t-1);
end.