记录编号	14630	评测结果	AAAAAAAAAA
题目名称	溶液模拟器	最终得分	100
用户昵称	lc	是否通过	通过
代码语言	Pascal	运行时间	0.262 s
提交时间	2009-11-02 17:58:58	内存使用	0.30 MiB

program simulator;
 const
   maxn = 10000;
 var
   V,C: array[0..maxn] of extended;
   n:           longint;
   s:           char;



procedure init;

 begin
   readln(V[0],C[0]);
   C[0] :=C[0];
 end;


procedure main;
 var
   i:   longint;
   len:     longint;
   Vi,Ci:       extended;
 begin
   readln(N);
   len :=0;
   for i :=1 to n do begin
       read(s);
       if s = 'P'
          then begin
               readln(Vi,Ci);
               inc(len);
               V[len] :=V[len-1] + Vi;
               C[len] :=(V[len-1]*C[len-1]+Vi*Ci) /(V[len-1]+Vi);
               writeln(V[len]:0:0,' ',C[len]:0:5)
               end
          else begin
               dec(len); if len <0 then len :=0;
               writeln(V[len]:0:0,' ',C[len]:0:5);
               readln;
               end;
       end;
 end;



begin
  assign(input,'simulator.in');  reset(input);
  assign(output,'simulator.out'); rewrite(output);
  init;
  main;
  close(input);  close(output);
end.