Andysun06 @ 2018-04-11 21:23:22

var n,i,l:longint;
s:string;
begin
n:=0;
readln(s);
l:=length(s);
for i:=1 to l do
begin
if (s[i]='t')and(n=0) then
n:=6;
if (s[i]='i')and(n=6) then
n:=66;
if (s[i]='t')and(n=66) then
n:=666;
if (s[i]='e')and(n=666) then
n:=6666;
if (s[i]='c')and(n=6666) then
n:=66666;
if (s[i]='h')and(n=66666) then
n:=666666;
if n=666666 then
begin
writeln('Yes');
halt;
end;
end;
writeln('No');
end.

by Andysun06 @ 2018-04-11 21:24:03

求帮忙

by Andysun06 @ 2018-04-11 21:25:06

有人吗？？？？

by Andysun06 @ 2018-04-11 21:30:14

有人吗？？？？

by happyZYM @ 2018-04-11 21:49:25

这是哪一题？@Andysun06

by Andysun06 @ 2018-04-12 20:28:46

@happyZYM AT1492

by lnslfnl @ 2018-04-13 22:40:09

WA 7 次终于试出题意了...

这道题要求分离之后不能多字符，也就是说

• titeche => No
• ttiitteecchht => No

而且可能出现多个 titech，也就是说

• titechtitech => Yes
• ttiitteecchh => Yes
• ttiitteecchhtitech => Yes

而且还有顺序要求

• titeceh => No
• ittitteecchh => No
• tititetcehch => Yes
  • 就比如这个，0、1、4、5、7、9 组成一个，2、3、6、8、10、11 又是一个

表达能力较弱，见谅

by ZXXS @ 2022-10-25 19:41:26

@lnslfnl ...