Задание

Дан массив, состоящий из 10 целых чисел от 1 до 1000.
Установите соответствие между условием задачи и фрагментом программы.

  • Объекты 1
    • Вычисление среднего арифметического всех элементов массива, которые не оканчиваются цифрой 2.
    • Поиск количества элементов, равных максимальному.
    • Вычисление суммы нечётных элементов и поиск количества чётных элементов.
    • Поиск минимального трёхзначного элемента.
  • Объекты 2
    • s := 0;
      k := 0;
      for i := 1 to 10 do begin
      if \(A⟨0⟩ mod 2\) <> 0 then
      s := s + A
      \[i\]

      else
      k := k + 1;
      end;
      writeln\(s, ' ', k\);
    • begin
      k := 1;
      m := 0;
      for i := 1 to 10 do
      begin
      if A
      \[i\]
      > m then
      m := A
      \[i\]
      ;
      end;
      for i := 1 to 10 do
      begin
      if A
      \[i\]
      = m then
      k := k + 1;
      end;
      writeln\(m, ' ', k\);
    • m := 1001;
      for i := 1 to 10 do
      begin
      if \(A⟨0⟩ \\gt = 100\) and \(A⟨0⟩ \\lt m\) then
      m := A
      \[i\]
      ;
      end;
      writeln\(m\);
    • s := 0;
      k := 0;
      for i := 1 to 10 do begin
      if \(A⟨0⟩ mod 10\) <> 2 then
      begin
      s := s + A
      \[i\]
      ;
      k := k + 1;
      end;
      end;
      s := s / k;
      writeln\(s\);