
8. Заполните массив случайными числами в диапазоне 0..100 и подсчитайте отдельно среднее значение
всех элементов, которые <50, и среднее значение всех элементов, которые ≥50.

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

Код (Pascal)
var
a: array[1..100] of integer;
n, i, cnt1, cnt2: integer;
ans1, ans2: real;
begin
n := random(100) + 1;
for i := 1 to n do
begin
a[i] := random(101);
writeln(a[i]);
end;
for i := 1 to n do
if (a[i] < 50) then
begin
cnt1 := cnt1 + 1;
ans1 := ans1 + a[i];
end
else
begin
cnt2 := cnt2 + 1;
ans2 := ans2 + a[i];
end;
writeln(ans1 / cnt1, ' ', ans2 / cnt2);
end.
-----------------------------
Файл решения прикреплён.




Для решения этой задачи, мы можем использовать язык программирования Python. Вам потребуется установить Python на свой компьютер, если у вас его ещё нет.
Вот пример кода, который заполняет массив случайными числами в диапазоне от 0 до 100, а затем вычисляет средние значения элементов массива, разделяя их на две категории: меньше 50 и больше или равно 50.
pythonimport random
# Функция для заполнения массива случайными числами
def fill_array(size):
return [random.randint(0, 100) for _ in range(size)]
# Функция для вычисления среднего значения
def calculate_mean(numbers):
return sum(numbers) / len(numbers)
# Задаем размер массива
array_size = 10
# Заполняем массив случайными числами
random_array = fill_array(array_size)
# Разделяем элементы массива на две категории
less_than_50 = [num for num in random_array if num < 50]
greater_or_equal_50 = [num for num in random_array if num >= 50]
# Вычисляем среднее значение для каждой категории
mean_less_than_50 = calculate_mean(less_than_50)
mean_greater_or_equal_50 = calculate_mean(greater_or_equal_50)
# Вывод результатов
print("Сгенерированный массив:", random_array)
print("Среднее значение элементов < 50:", mean_less_than_50)
print("Среднее значение элементов >= 50:", mean_greater_or_equal_50)
Выполните этот код в вашей среде разработки Python, и вы получите сгенерированный массив, а также средние значения для элементов меньше 50 и больше или равно 50.


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

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