Pascal :

var
  a,b,c:integer;
  d:real;
begin
  readln(a,b,c);
  d:=(a+b+c)/3;
write(d:0:2);
end.