Установи соответствие между записанными на языке Паскаль фрагментами программ обработки одномерного числового массива и результатами их работы. 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\; 2=0 then s : =s+a[i]; n : =1; for i : =2 to 10 do if a[i] \lt a[n] then n : =i; k : =0; for i : =1 to 100 do if a[i] \; mod \; 5=0 then k : =k+1; m : =a[1]; for i : =2 to 10 do if a[i] \gt m then m : =a[i]; z : =1; for i : =1 to 10 do if a[i]\lt \gt0 then z : =z*a[i]; 1 2 3 4 5 6 Произведение ненулевых элементов массива —. Значение наибольшего элемента массива — . Сумма всех элементов массива с чётными номерами — . Номер (индекс) минимального элемента массива — . Количество всех элементов массива, значения которых кратны 5, —. Количество нулевых элементов массива — .
Задание

Соотнеси элементы

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

  1. \(y\) :
    \(=0\) ;

    for \(i\) : \(=1\) to \(10\) do

    if \(a[i]=0\) then \(y\) : \(=y+1\) ;

  2. \(s\) :
    \(=0\) ;

    for \(i\) : \(=1\) to \(15\) do

    if \(i\; mod\; 2=0\) then \(s\) : \(=s+a[i]\) ;

  3. \(n\) :
    \(=1\) ;

    for \(i\) : \(=2\) to \(10\) do

    if \(a[i] \lt a[n]\) then \(n\) : \(=i\) ;

  4. \(k\) :
    \(=0;\)
    for \(i\) : \(=1\) to \(100\) do

    if \(a[i] \; mod \; 5=0\) then \(k\) : \(=k+1\) ;

  5. \(m\) :
    \(=a[1];\)
    for \(i\) : \(=2\) to \(10\) do

    if \(a[i] \gt m\) then \(m\) : \(=a[i]\) ;

  6. \(z\) :
    \(=1;\)
    for \(i\) : \(=1\) to \(10\) do

    if \(a[i]\lt \gt0\) then \(z\) : \(=z\*a[i]\) ;

  • 1
  • 2
  • 3
  • 4
  • 5
  • 6

Произведение ненулевых элементов массива — [ ].

Значение наибольшего элемента массива — [ ] .

Сумма всех элементов массива с чётными номерами — [ ] .

Номер (индекс) минимального элемента массива — [ ] .

Количество всех элементов массива, значения которых кратны \(5\) , — [ ].

Количество нулевых элементов массива — [ ] .