USACO-Chapter1-Section 1.1-Broken Necklace (beads)

【题目描述】

      你有一条由N个红色的，白色的，或蓝色的珠子组成的项链(3<=N<=350)，珠子是随意安排的。 这里是 n=29 的二个例子:

               1 2                               1 2
           r b b r                           b r r b
         r         b                       b         b
        r           r                     b           r
       r             r                   w             r
      b               r                 w               w
     b                 b               r                 r
     b                 b               b                 b
     b                 b               r                 b
      r               r                 b               r
       b             r                   r             r
        b           r                     r           r
          r       r                         r       b
            r b r                             r r w
            图片 A                        图片  B
                

r 代表 红色的珠子      
b 代表 蓝色的珠子   
w 代表 白色的珠子

　　第一和第二个珠子在图片中已经被作记号。
　　图片 A 中的项链可以用下面的字符串表示：

brbrrrbbbrrrrrbrrbbrbbbbrrrrb

　　假如你要在一些点打破项链,展开成一条直线，然后从一端开始收集同颜色的珠子直到你遇到一个不同的颜色珠子，在另一端做同样的事(颜色可能与在这之前收集的不同)。 确定应该在哪里打破项链来收集到最大数目的珠子。
　　例如，在图片 A 中的项链中，在珠子 9 和珠子 10 或珠子 24 和珠子 25 之间打断项链可以收集到8个珠子。

    表现含有白珠项链的字符串将会包括三个符号 r ， b 和 w 。
    写一个程序来确定从一条被给出的项链可以收集到的珠子最大数目。

【输入格式】

      第 1 行: N, 珠子的数目
      第 2 行: 一串长度为N的字符串, 每个字符是 r ， b 或 w。

【输出格式】

      单独的一行 最大可能取得的珠子数

【输入样例】

29 
wwwbbrwrbrbrrbrbrwrwwrbwrwrrb     

【输出样例】

11

【思路】

      模拟题，先破环为链，三个串连接，枚举中间的串的断点数，分别从前往后和从后往前数，如果该断点是w则往下次找，知道找到一个不是w作为此次查找的依据，总数记为tot1，同理处理另一边，记为tot2。输出tot1+tot2即可。（主意在找断点的时候一定是i和i+1开始，并且主意在往后找非w时候主意计数）

【代码】

• Executing...
• Test 1: TEST OK [0.000 secs, 276 KB]
• Test 2: TEST OK [0.000 secs, 276 KB]
• Test 3: TEST OK [0.000 secs, 276 KB]
• Test 4: TEST OK [0.000 secs, 276 KB]
• Test 5: TEST OK [0.000 secs, 276 KB]
• Test 6: TEST OK [0.000 secs, 276 KB]
• Test 7: TEST OK [0.000 secs, 276 KB]
• Test 8: TEST OK [0.000 secs, 276 KB]
• Test 9: TEST OK [0.000 secs, 276 KB]
• All tests OK.

{
 ID  : c_CaM.19
 LANG: PASCAL
 TASK: beads
}
Program CaM(input,output);
Var
  tot1,tot2,max,n,i,j,l,k,ff,f:longint;
  ss,s:ansistring;
  lef:char;

Procedure innt;
Begin
  assign(input,'beads.in'); reset(input);
  assign(output,'beads.out'); rewrite(output);
End;

Procedure outt;
Begin
  close(input);
  close(output);
End;

Begin
  innt;

  readln(n); readln(ss);
  l:=n; s:=ss+ss+ss;
  for i:=l+1 to l*2 do
  Begin
    if i=99 then
      f:=2;
    tot1:=1; tot2:=1;
    for j:=i downto 1 do
    Begin
      if s[j]<>'w' then break;
      inc(tot1);
    End;
    lef:=s[j]; j:=j-1;
    while (j>=1)and((s[j]=lef)or(s[j]='w')) do
    Begin
      dec(j);
      inc(tot1);
    End;
    for j:=i+1 to l*2 do
    Begin
      if s[j]<>'w' then break;
      inc(tot2);
    End;
    lef:=s[j]; j:=j+1;
    while (j<=3*l)and((s[j]=lef)or(s[j]='w')) do
    Begin
      inc(j);
      inc(tot2);
    End;
    if tot1+tot2>l then begin max:=l; ff:=i; end
    else
    if tot1+tot2>max then begin max:=tot1+tot2; ff:=i; end;
  End;
  writeln(max);

  outt;
End.