var a,b: integer;
c: real;
begin
writeln('Введите первое число: ');
readln(a);
writeln('Введите второе число: ');
readln(b);
c:= (a+b)/2;
writeln('ответ:', c);
end.
var a,b: integer;
c: real;
begin
writeln('Введите первое число: ');
readln(a);
writeln('Введите второе число: ');
readln(b);
c:= (a+b)/2;
writeln('ответ:', c);
end.