Программа для вычисления среднего арифметического из двух чисел в паскале

var a,b,s : real; // объявляем переменные 

begin writeln(\'Введите два числа:\'); // вывод на экран строки readln(a,b);                           // считываем два числа, введенных с клавиатуры s:= (a + b) / 2 ;                    // вычисляем среднее арифметическое  writeln (\'Среднее арифметическое чисел \', a, \' и \', b, \' равно \', s); // вывод на экран результатаend.