现在的位置: 首页 > 综合 > 正文

乒乓球

2018年01月17日 ⁄ 综合 ⁄ 共 1912字 ⁄ 字号 评论关闭

【问题背景】

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

 华华通过以下方式进行分析,首先将比赛每个球的胜负列成一张表,然后分别计算在11分制和21分制下,双方的比赛结果(截至记录末尾)。
比如现在有这么一份记录,(其中W表示华华获得一分,L表示华华对手获得一分):
WWWWWWWWWWWWWWWWWWWWWWLW
11分制下,此时比赛的结果是华华第一局110获胜,第二局110获胜,正在进行第三局,当前比分11。而在21分制下,此时比赛结果是华华第一局210获胜,正在进行第二局,比分21。如果一局比赛刚开始,则此时比分为00
你的程序就是要对于一系列比赛信息的输入(WL形式),输出正确的结果。

输入格式

每个输入文件包含若干行字符串(每行至多20个字母),字符串有大写的WLE组成。其中E表示比赛信息结束,程序应该忽略E之后的所有内容。

输出格式

输出由两部分组成,每部分有若干行,每一行对应一局比赛的比分(按比赛信息输入顺序)。其中第一部分是11分制下的结果,第二部分是21分制下的结果,两部分之间由一个空行分隔。

【样例输入】

WWWWWWWWWWWWWWWWWWWW

WWLWE

【样例输出】

11:0

11:0

1:1

21:0

2:1

解析:此题时一个字符串处理的简单题,但是简单题并不是随随便便就能拿到分的,解决此题首先要解决的问题是题意的理解上,很多同学初一看此题,把一局谁拿到11分或21分就作为此局的胜利,如果这样就犯了一个大错,此题没有在题目里明确说明,但是根据兵乓球的比赛规则是,除了要期中一位选手要达到局分外还要两名选手的分差要在2分或两分以上,这是其一,还有要对数据要有充分的分析,要考虑到特殊情况,此题的特殊情况就是,如果输入的第一个字符就是‘E’,那输出的结果应该是0:0,解决了以上问题,下面的实现虽然有点麻烦,但是仔细点应该问题就不大了,我的做法是,边读数据边输出11分制的比分,而把21分制的比分用两个数组存起来,最后再输出。下面是我写的pascal代码:

var
  ch:char;
  a,b:array[1..10000] of integer;
  w1,l1,w2,l2,i,j:integer;
begin
  assign(input,'table.in');
  assign(output,'table.out');
  reset(input);
  rewrite(output);
  fillchar(a,sizeof(a),0);
  fillchar(b,sizeof(b),0);  
  w1:=0;
  l1:=0;
  w2:=0;
  l2:=0;
  i:=0;
  read(ch);
  if ch='E' then writeln(0,':',0);
  while ch<>'E' do
    begin
      if ch='W' then begin inc(w1);inc(w2);end;
      if ch='L' then begin inc(l1);inc(l2);end;
      if ((w1>=11)or(l1>=11)) and (abs(w1-l1)>1) then
         begin
           writeln(w1,':',l1);
           w1:=0;
           l1:=0;
         end;
      if ((w2>=21)or (l2>=21)) and (abs(w2-l2)>1) then
        begin
          inc(i);
          a[i]:=w2;
          b[i]:=l2;
          w2:=0;
          l2:=0;
        end;
      read(ch);
    end;
  if w1+l1<>0 then writeln(w1,':',l1);
  writeln;
  if (w2+l2)<>0 then
    begin
      inc(i);
      a[i]:=w2;
      b[i]:=l2;
    end;
  if i=0 then writeln(0,':',0);
  for j:=1 to i do writeln(a[j],':',b[j]);
  close(input);
  close(output);
end.

抱歉!评论已关闭.