比赛代码 - COGS

比赛	十一中校庆欢乐赛	评测结果	AAAAAAAAAA
题目名称	money	最终得分	100
用户昵称	helloworld123	运行时间	0.005 s
代码语言	Pascal	内存使用	0.15 MiB
提交时间	2014-10-23 19:12:17

显示代码纯文本

program cogs956;
var
 x,y,i,j,n,m:longint;
 total:extended;
begin
  assign(input,'dog.in'); reset(input);
  assign(output,'dog.out'); rewrite(output);
   readln(n);
   total:=0;
   for i:=1 to n do
     begin
      readln(x,y);
       total:=total+x*(y/10);
     end;
   writeln(total:0:2);
  close(input); close(output);
end.