Question

❓❓❓Дан массив целых чисел B(40). Составить программу для вычисления количества элементов массива, которые кратны 5 .​

Answer 1

                                     PascalABC.NET                                      

Ответ:

С ручным заполнением:

• begin
• Print('Количество:', ReadArrInteger(40).Count(x->x mod 5 = 0) );
• end.

С рандомным заполнением:

• begin
• var b := ArrRandom(40,0,100);
• b.Println;
• Print('Количество:', b.Count(x->x mod 5 = 0) );
• end.

Пример работы:

Answer 2

Для вычисления количества элементов массива, которые кратны 5, вам понадобится написать программу на языке программирования. Ниже приведен пример программы на языке Python:

pythonCopy code
# Задаем массив целых чисел B(40)
B = [ваш_список_чисел_размером_40]

# Инициализируем счетчик для подсчета элементов, кратных 5
count = 0

# Проходим по каждому элементу массива и проверяем, кратен ли он 5
for num in B:
    if num % 5 == 0:
        count += 1

# Выводим результат
print("Количество элементов массива, кратных 5:", count)

В этой программе вы должны заменить [ваш_список_чисел_размером_40] на ваш фактический массив из 40 целых чисел. После выполнения программы, она выведет количество элементов массива, которые кратны 5.

Пожалуйста, учтите, что это пример на языке Python. Если вы используете другой язык программирования, код может отличаться, но общая логика останется примерно такой же.