Найти среднее арифметическое трех чисел a, b, c. На языке Паскаль.

Для того чтобы найти среднее арифметическое трех чисел a, b и c на языке Паскаль, нужно сложить все три числа и разделить результат на 3. Вот пример программы, которая выполняет эту задачу:

pascal
Копировать код
program Average;
var
  a, b, c: real;
  average: real;
begin
  { Ввод данных }
  writeln('Введите три числа:');
  readln(a, b, c);
  { Вычисление среднего арифметического }
  average := (a + b + c) / 3;
  { Вывод результата }
  writeln('Среднее арифметическое чисел: ', average:0:2);
end.

Здесь:

• Переменные a, b, c используются для хранения введенных чисел.

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

• В строке average := (a + b + c) / 3; происходит сложение чисел и деление на 3.

• Результат выводится с точностью до двух знаков после запятой с помощью average:0:2.