как я думаю то нужно на Паскалеvar a,b,c:real;
begin
c:=0;
readln(a,b);
c:=(a+b)/2;
writeln(c:10:2);
readln
end.