Найти среднее арифметическое двух вещественных чисел - Pascal

Формулировка задачи:

Нужно найти среднее арифметическое двух заданных вещественных чисел! Я новичок! Ну я так понимаю нужно сначало их сложить и поделить, а как это сделать

var
a,b:real
begin
read(a,b);
write((a+b/2));

так что-ли ?!

Решение задачи: «Найти среднее арифметическое двух вещественных чисел»

Листинг программы

var a,b:real;
begin
readlna,b);
write((a+b)/2:0:3);
end.

Объяснение кода листинга программы

В данном коде происходит чтение двух вещественных чисел из стандартного ввода и запись их среднего арифметического в стандартный вывод.

Переменные a и b объявлены как вещественные числа.
С помощью функции readln() происходит чтение двух вещественных чисел из стандартного ввода.
Значения переменных a и b присваиваются прочитанным числам.
Затем происходит запись в стандартный вывод среднего арифметического этих двух чисел, округленного до третьего знака после запятой.
Программа завершается.