POJ 1004(小数处理)

版权声明:本文为博主原创文章,未经博主允许不得转载。 https://blog.csdn.net/nike0good/article/details/7855616

输出巨恶心,行末无回车


Program P1004;
var
   a,b:double;
   i:longint;
begin
   read(a);
   for i:=2 to 12 do
   begin
      read(b);
      a:=a+b;
   end;
   a:=a/12;
   write('$',a:2:2);
end.


展开阅读全文

没有更多推荐了,返回首页