Question

Напишите программу вычисления среднего арифметического двух чисел. (в паскале)Заранее спасибо)

Answer 1

Var x,y:real;
begin
  read(x,y);
  writeln((x+y)/2);
end;