记录编号 14615 评测结果 AAAAAAAAAA
题目名称 溶液模拟器 最终得分 100
用户昵称 GravatarHamster 是否通过 通过
代码语言 Pascal 运行时间 0.215 s
提交时间 2009-11-02 17:34:56 内存使用 0.23 MiB
显示代码纯文本
program simulator;
var
  a1:array[0..10000] of longint;
  a2:array[0..10000] of real;
  i,j,c,v,vv,n,ii:longint;
  cc:real;
  r:char;


begin
  assign(input,'simulator.in');
  assign(output,'simulator.out');
  reset(input);
  rewrite(output);

  read(v,c);
  a1[0]:=v;
  a2[0]:=(c/100)*100;

  readln(n);
  ii:=0;
  for i:=1 to n do
  begin
    read(r);
    if r='P' then
	begin
	  inc(ii);
	  readln(v,c);
	  a1[ii]:=v+a1[ii-1];
	  a2[ii]:=(a1[ii-1]*a2[ii-1]+v*c)/a1[ii];
	  write(a1[ii],' ',a2[ii]:0:5);
      writeln;
	end
	else
	begin
	  readln;
	  dec(ii);
	  if ii<0 then ii:=0;
      write(a1[ii],' ',a2[ii]:0:5);
      writeln;
    end;
  end;


  close(input);
  close(output);
end.