Даны два числа a и b.найди их средне арифметическое: (a+b)/2, если a=4.6; b=3.4

Program qq;
uses crt;
var a,b,c:real;
begin
write(Введите число a );
read(a);
write(Введите число b );
read(b);
c:=(a+b)/2;
writeln(Среднее арифметическое этих чисел равно ,c);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.