
Дан целочисленный массив из 30 элементов. Элементы массива могут принимать целые значения от 0 до
1000. Опишите алгоритм, позволяющий найти среднее арифметическое нечетных трехзначных чисел в этом массиве.

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

const n=5;
var
a:array [1..n] of integer;
sum,i,count:integer;
begin
sum:=0; count:=0;
for i:=1 to n do
begin
readln(a[i]);
if (a[i] mod 2 = 1) and (a[i]>99) and (a[i]<1000) then
begin
sum:=sum+ a[i];
inc(count);
end;
end;
if count>0 then
writeln('Sr ar:', sum/count:4:2)
else writeln('Error');
end.



Конечно, вот алгоритм, который позволит найти среднее арифметическое нечетных трехзначных чисел в заданном массиве:
Инициализируйте две переменные:
sum
для хранения суммы найденных нечетных трехзначных чисел иcount
для подсчета количества таких чисел.Проходите по каждому элементу в массиве:
- Проверьте, является ли текущий элемент нечетным и имеет ли он три цифры (то есть находится в диапазоне от 100 до 999).
- Если выполняются оба условия, добавьте значение текущего элемента к переменной
sum
и увеличьте значение переменнойcount
на 1.
После прохода по всем элементам массива, проверьте значение
count
:- Если
count
больше 0, вычислите среднее арифметическое, разделив сумму (sum
) на количество (count
). - Если
count
равно 0, это означает, что в массиве не было нечетных трехзначных чисел. В этом случае среднее арифметическое не существует.
- Если
Верните вычисленное среднее арифметическое или соответствующее сообщение, если таких чисел не было.
Вот пример такого алгоритма на псевдокоде:
plaintextsum = 0 count = 0 for each element in array: if element % 2 != 0 and element >= 100 and element <= 999: sum += element count += 1 if count > 0: average = sum / count return average else: return "No odd three-digit numbers found."
Запустив этот алгоритм на вашем массиве из 30 элементов, вы сможете найти среднее арифметическое нечетных трехзначных чисел в массиве.


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







Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili