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

Для того чтобы найти сумму, произведение и среднее арифметическое трех чисел на языке программирования Паскаль, можно воспользоваться следующим кодом:

pascal
Копировать
program Calculate;
var
  a, b, c: Integer;
  sum, product, average: Real;
begin
  { Вводим три числа }
  Write('Введите первое число: ');
  ReadLn(a);
  Write('Введите второе число: ');
  ReadLn(b);
  Write('Введите третье число: ');
  ReadLn(c);
  { Вычисляем сумму }
  sum := a + b + c;
  { Вычисляем произведение }
  product := a * b * c;
  { Вычисляем среднее арифметическое }
  average := (a + b + c) / 3;
  { Выводим результаты }
  WriteLn('Сумма чисел: ', sum);
  WriteLn('Произведение чисел: ', product);
  WriteLn('Среднее арифметическое чисел: ', average:0:2);
end.

Объяснение программы:

1. Сначала вводятся три числа с помощью команды ReadLn.

2. Для вычисления суммы используем обычное сложение.

3. Произведение вычисляется с помощью умножения.

4. Среднее арифметическое находим путем деления суммы чисел на 3.

5. Результаты выводятся с помощью WriteLn. Для среднего арифметического задаем формат вывода :0:2, что означает вывод числа с двумя знаками после запятой.

Этот код полностью решает поставленную задачу.