Составить линейный алгоритм. дано три числа. найти их среднее арифметическое.

Var
 a,b,c,rez:real;
begin
writeln(Введите число а:);
readln(a);
writeln(Введите число b:);
readln(b);
writeln(Введите число c:);
readln(c);
rez:=(a+b+c)/3;
write(Среднее арифметическое :);
writeln(rez);
end.

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