Дан массив, состоящий из 5 целых чисел. Установите соответствие между условием задачи и фрагментом программы. Вычисление среднего арифметического значения отрицательных элементов массива. Вычисление количества нечётных элементов массива. Вычисление суммы чётных элементов массива. Вычисление произведения положительных элементов массива. s := 0; k := 0; for i := 1 to 5 do if A[i] < 0 then begin s := s + A[i]; k := k + 1; end; s := s / k; writeln(s); s := 0; for i := 1 to 5 do begin if A[i] mod 2 = 0 then s := s + A[i]; end; writeln(s); s := 0; for i := 1 to 5 do begin if A[i] mod 2 <> 0 then s := s + 1; end; writeln(s); s := 1; for i := 1 to 5 do begin if A[i] > 0 then s := s * A[i]; end; writeln(s);
Задание

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

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