Question

Дан массив Q(15) , заполненный числами [0,100].Найдите количество чётных чисел и их сумму помогите, пожалуйста !!

Answer 1

// дан массив Q(15) , заполненный числами [0,100].Найдите количество чётных чисел и их сумму
Var Q    : array [1..15] of byte;
    i,n  : byte;
    s    : word;
begin
  randomize;
  for i:=1 to 15 do
    begin
      Q[i]:=random(101); //заполняем массив случайными числами
    end;
  for i:=1 to 15 do
    begin
      if (Q[i]mod 2=0) then //определяем четные чиcла
        begin
          n:=n+1;           //высчитываем их количество
          s:=s+Q[i];        //и сумму
        end;
    end;
writeln ('в данном массиве ',n,' четных чисел. Их сумма равна ',s)
end.

Первый и второй циклы можно объединить (я так делал для наглядности) 

Answer 2

Для решения данной задачи нужно пройтись по каждому элементу массива и проверить, является ли он четным числом. Если число четное, увеличиваем счетчик четных чисел на 1 и добавляем данное число к сумме четных чисел.

Вот пример кода на языке Python, который решает данную задачу:

Q = [25, 13, 42, 78, 56, 91, 68, 37, 84, 99, 2, 47, 63, 81, 50]
even_count = 0  # счетчик четных чисел
even_sum = 0  # сумма четных чисел

for num in Q:
    if num % 2 == 0:  # проверка на четность
        even_count += 1
        even_sum += num

print("Количество четных чисел:", even_count)
print("Сумма четных чисел:", even_sum)

В данном примере массив Q содержит 15 чисел в диапазоне от 0 до 100. После выполнения кода будет выведено количество четных чисел (в данном случае 7) и их сумма (в данном случае 380).