a565. 2.p&q的邂逅 -- 101學年度台北市資訊學科能力競賽 | From: [101.231.75.151] | 發表日期 : 2014-07-24 11:21

經過幾天的努力，被無數次的NA洗刷后，我終於得到了AC

就我個人的想法，這道題pascal解的話，最後一組測資必定TLE

而且千萬不要用string做這道題，要不然會MLE

我是直接做輸出的，速度要比一般快得多，抓住應該輸出的做輸出效率會更高

下面這個程式應該能幫助大家：

var

  a,p,q,z:longint;

  c:char;

begin

  readln(a);

  while not eof do begin

   p:=0;

   z:=0;

   read(c);

   while (ord(c)<>10) and (ord(c)<>13) do begin

    case c of

     'p': inc(p);

     'q': if p>0 then begin p:=p-1; inc(z); end;

    end;

    read(c);

   end;

   writeln(z);

  end;

end.

////////////////////////////////////////////////

但是，千萬不要抄這個代碼（會NA）

一定要讀懂了再做這道題