Question

Найдите количество четных чисел в массиве целых чисел.Написать программу в Паскале

Answer 1

Смотри сюда, нет тут никаких br. В окне вывода внизу первая строка это начальный массив, вторая строка - это четные в массиве, третья строка - количество четных

Answer 2

Для нахождения количества четных чисел в массиве целых чисел вам потребуется написать программу на языке Паскаль. Вот пример такой программы:

program CountEvenNumbers;

var
  arr: array of Integer;
  count: Integer;
  i: Integer;

begin
  // Инициализация массива
  SetLength(arr, 10);
  arr[0] := 1;
  arr[1] := 2;
  arr[2] := 3;
  arr[3] := 4;
  arr[4] := 5;
  arr[5] := 6;
  arr[6] := 7;
  arr[7] := 8;
  arr[8] := 9;
  arr[9] := 10;

// Подсчет количества четных чисел
  count := 0;
  for i := 0 to Length(arr) - 1 do
  begin
    if arr[i] mod 2 = 0 then
      count := count + 1;
  end;

// Вывод результата
  writeln('Количество четных чисел: ', count);

end.

В этой программе мы создаем массив `arr` и инициализируем его значениями от 1 до 10. Затем мы проходим по всем элементам массива и проверяем, является ли каждое число четным. Если число четное, мы увеличиваем счетчик `count` на 1. В конце программы выводится количество четных чисел.

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