Вопрос задан 06.11.2023 в 04:35. Предмет Информатика. Спрашивает Белазуров Женя.

Дети собирали яблоки. Им интересно узнать, сколько в среднем собрал каждый. Ограничения:

0<=N<=32000 0<=A[i]<=32000 Формат ввода N - количество детей A[1] A[2] ... A[N] - количество яблок, которое собрал i ребенок Формат вывода SRED - сколько в среднем собрал каждый ребенок с двумя знаками после запятой Пример ввода: 2 10 12 Пример вывода: 11.00 НАПИСАТЬ В ПАСКАЛЬ!
0 0
Перейти к ответам

Ответы на вопрос

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Симонов Ярик.

Ответ:

Объяснение:

Не знаю, что пояснять)

var x,sr,c,n:integer;  

 begin

   sr:=0;

   readln (n);

   for var i:=1 to N do begin

     readln (x);

     sr:=sr+x;

   end;

   writeln (sr/n:0:2);

 end.

0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Ваша задача - написать программу на языке Паскаль, которая вычисляет среднее количество яблок, собранных каждым ребенком. Вам нужно принимать количество детей и количество яблок, собранных каждым ребенком, а затем вычислить и вывести среднее количество яблок.

Вот шаги, которые вы можете следовать:

1. Объявите переменные для хранения количества детей, количества яблок, собранных каждым ребенком, и среднего количества яблок.

2. Прочитайте количество детей с консоли.

3. Используйте цикл для чтения количества яблок, собранных каждым ребенком, и суммирования этих значений.

4. Вычислите среднее количество яблок, разделив сумму на количество детей.

5. Выведите среднее количество яблок на консоль с двумя знаками после запятой.

Вот пример кода на языке Паскаль, который выполняет эту задачу:

```pascal program AverageApples; uses crt; var N, i, sum: integer; avg: real; begin readln(N); sum := 0; for i := 1 to N do begin var apples: integer; readln(apples); sum := sum + apples; end; avg := sum / N; writeln(avg:0:2); end. ```

В этом коде `N` - это количество детей, `i` - это индекс для цикла, `sum` - это сумма яблок, собранных каждым ребенком, и `avg` - это среднее количество яблок. Цикл `for` используется для чтения количества яблок, собранных каждым ребенком, и суммирования этих значений. Затем среднее количество яблок вычисляется путем деления суммы на `N`. В конце среднее количество яблок выводится на консоль с двумя знаками после запятой.

0 0

Похожие вопросы

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос