Времени суток! слезно с информатикой. сегодня. на ветвление. в больнице ведут прием 2 врача. приемы платные. подсчитать среднюю стоимость за прием у 1 и 2 врача.

Var a,b: integer;
c: real;
begin
writeln('Введите сумму денег приёма 2-ух врачей');
readln(a,b);
c:=(a+b)/2;
writeln(c);
end.