Заполнить массив из 10 элементов случайными целыми числами в интервале [0, 100] и подсчитать среднее...

Тематика Информатика
Уровень 10 - 11 классы
Pascal массивы случайные числа среднее значение программирование
0

Заполнить массив из 10 элементов случайными целыми числами в интервале [0, 100] и подсчитать среднее значение всех элементов, которые <50 Pascal

avatar
задан 5 месяцев назад

2 Ответа

0

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

  1. Создать массив из 10 элементов.
  2. Заполнить массив случайными числами в диапазоне от 0 до 100.
  3. Найти среднее значение элементов массива, которые меньше 50.

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

program AverageBelow50;
uses crt;

const
  Size = 10;
  MaxValue = 100;

var
  Numbers: array[1.Size] of Integer;
  Sum, Count, i: Integer;
  Average: Real;

begin
  Randomize;  // Инициализация генератора случайных чисел
  Sum := 0;
  Count := 0;

  // Заполнение массива и вывод его элементов
  for i := 1 to Size do
  begin
    Numbers[i] := Random(MaxValue + 1);  // Случайное число от 0 до 100
    Write(Numbers[i], ' ');
  end;

  // Подсчёт суммы и количества элементов меньше 50
  for i := 1 to Size do
  begin
    if Numbers[i] < 50 then
    begin
      Sum := Sum + Numbers[i];
      Count := Count + 1;
    end;
  end;

  // Расчёт среднего значения
  if Count > 0 then
  begin
    Average := Sum / Count;
    Writeln;
    Writeln('Среднее значение элементов < 50: ', Average:0:2);
  end
  else
    Writeln('Нет элементов меньше 50.');

  Readln;
end.

В этом коде:

  • Randomize инициализирует генератор случайных чисел.
  • Random(MaxValue + 1) генерирует случайное число от 0 до 100.
  • Мы используем два цикла: один для заполнения массива и вывода его элементов, другой — для подсчёта суммы и количества подходящих элементов.
  • Если найдены элементы, удовлетворяющие условию (меньше 50), то рассчитывается и выводится их среднее значение.

Такой подход позволяет эффективно решить задачу с использованием базовых конструкций языка Pascal.

avatar
ответил 5 месяцев назад
0

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

  1. Создать массив из 10 элементов и заполнить его случайными целыми числами в интервале [0, 100].
  2. Пройти по всем элементам массива и проверить условие, что значение элемента меньше 50.
  3. Если условие выполняется, то добавить это значение к сумме всех элементов, которые меньше 50.
  4. Посчитать количество элементов, которые меньше 50.
  5. Найти среднее значение элементов, которые меньше 50, разделив сумму на количество.

Пример кода на языке Python:

import random

# Создаем массив из 10 элементов
array = [random.randint(0, 100) for _ in range(10)]

# Инициализируем переменные
sum_values = 0
count_values = 0

# Проходим по всем элементам массива
for num in array:
    if num < 50:
        sum_values += num
        count_values += 1

# Проверка деления на ноль
if count_values != 0:
    average = sum_values / count_values
else:
    average = 0

print("Массив:", array)
print("Среднее значение всех элементов 

avatar
ответил 5 месяцев назад

Ваш ответ

Вопросы по теме