codeves天梯 乒乓球

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

 

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

比如现在有这么一份记录,(其中W表示华华获得一分,L表示华华对手获得一分):

WWWWWWWWWWWWWWWWWWWWWWLW

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

你的程序就是要对于一系列比赛信息的输入(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.


你可能感兴趣的:(codeves天梯)