program O_ig_atlag;
var x,o:real;
    db:byte;
begin
  readln(x);
  while x<>0 do
  begin
   inc(db);
   o:=o+x;
   readln(x);
  end;
  writeln('Az atlag: ',o/db:6:2);
  readln
end.