Pascal :

var a,b:integer;
c:real;
begin
readln(a,b);
c:=(a+b)/2;
writeln(c:10:2);
end.