codeves天梯乒乓球

国际乒联现在主席沙拉拉自从上任以来就立志于推行一系列改革，以推动乒乓球运动在全球的普及。其中11分制改革引起了很大的争议，有一部分球员因为无法适应新规则只能选择退役。华华就是其中一位，他退役之后走上了乒乓球研究工作，意图弄明白11分制和21分制对选手的不同影响。在开展他的研究之前，他首先需要对他多年比赛的统计数据进行一些分析，所以需要你的帮忙。

【问题描述】华华通过以下方式进行分析，首先将比赛每个球的胜负列成一张表，然后分别计算在11分制和21分制下，双方的比赛结果（截至记录末尾）。

比如现在有这么一份记录，（其中W表示华华获得一分，L表示华华对手获得一分）：

WWWWWWWWWWWWWWWWWWWWWWLW

在11分制下，此时比赛的结果是华华第一局11比0获胜，第二局11比0获胜，正在进行第三局，当前比分1比1。而在21分制下，此时比赛结果是华华第一局21比0获胜，正在进行第二局，比分2比1。如果一局比赛刚开始，则此时比分为0比0。

你的程序就是要对于一系列比赛信息的输入（WL形式），输出正确的结果。

分析：直接模拟，需要注意的是可能在了打到11分后还要继续打（乒乓球的规则要净胜两球，一开始没注意被坑了==）

var
  s:char;
  ans,tot,tot1,a,j,k,o,p:longint;
  n,m,q,w:array[1..10000] of longint;

begin
  read(s);
  ans:=1;
  if s='E' then
  begin
    writeln(0,':',0);
    writeln;
    write(0,':',0);
    exit;
  end;
  while s<>'E' do
  begin
    if s='W' then
    begin
      inc(j);
      inc(o);
    end;
    if s='L' then
    begin
      inc(k);
      inc(p);
    end;
    if ((j>=11) or (k>=11)) and (abs(j-k)>1) then
    begin
      inc(tot1);
      q[tot1]:=j;
      w[tot1]:=k;
      j:=0;
      k:=0;
    end;
    if ((o>=21) or (p>=21)) and (abs(o-p)>1) then
    begin
      inc(tot);
      m[tot]:=o;
      n[tot]:=p;
      o:=0;
      p:=0;
    end;
    read(s);
    inc(ans);
  end;
  for a:=1 to tot1 do
    writeln(q[a],':',w[a]);
  if (j<>0) or (k<>0) then writeln(j,':',k);
  if (j=0) and (k=0) then writeln(0,':',0);
  writeln;
  for a:=1 to tot do
    writeln(m[a],':',n[a]);
  if (o<>0) or (p<>0) then write(o,':',p);
  if (o=0) and (p=0) then write(0,':',0);
end.