Задание

Установите соответствие между записанными на языке Паскаль фрагментами программ обработки одномерного числового массива и результатами их работы.

  • Объекты 1
    • y:=0;
      for i:=1 to 10 do
      if a
      \[i\]
      = 0 then y:=y+1;
    • s:=0;
      for i:=1 to 15 do
      if i mod 3 = 0 then s:=s+a
      \[i\]
      ;
    • k:=0;
      for i:=1 to 100 do
      if a
      \[i\]
      mod 5 = 0 then k:=k+1;
    • z:=1;
      for i:=1 to 10 do
      if a
      \[i\]
      < >0 then z:=z*a
      \[i\]
      ;
  • Объекты 2
    • Количество нулевых элементов массива
    • Сумма всех элементов массива с номерами кратными 3
    • Количество всех элементов массива, значения которых кратны 5
    • Произведение ненулевых элементов массива