Задание
Установите соответствие между записанными на языке Паскаль фрагментами программ обработки одномерного числового массива и результатами их работы.
- Объекты 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\];
- y:=0;
- Объекты 2
- Количество нулевых элементов массива
- Сумма всех элементов массива с номерами кратными 3
- Количество всех элементов массива, значения которых кратны 5
- Произведение ненулевых элементов массива