Question

Ввести массив А[1...5]. Определить количество элементов кратных 3.​

Answer 1

program massiv;

var a:array[1..5] of integer;

i,k:integer;

begin

Writeln('Введите числа массива');

for i:=1 to 5 do

begin

write('a[',i,']=');

readln(a[i]);

end;

for i:=1 to 5 do

begin

if a[i] div 3<>0 then

k:=k+1;

end;

writeln('Колличество чисел кратных 3 =',k);

end.

Answer 2

Для определения количества элементов массива, которые кратны 3, вам нужно выполнить следующие шаги:

1. Введите массив А[1...5], состоящий из 5 элементов.
2. Посчитайте количество элементов массива, которые кратны 3.

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

pythonCopy code
def count_multiples_of_three(arr):
    count = 0
    for num in arr:
        if num % 3 == 0:
            count += 1
    return count

# Ввод массива А[1...5]
A = []
for i in range(5):
    num = int(input(f"Введите элемент массива А[{i + 1}]: "))
    A.append(num)

# Определение количества элементов, кратных 3
result = count_multiples_of_three(A)
print(f"Количество элементов кратных 3: {result}")

Выполните этот код, и программа попросит вас ввести 5 элементов массива, после чего определит количество элементов, кратных 3, и выведет результат.