HWHelper HomeWorkHelper.ru

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

Рабочая тетрадь по Информатике 9 класс Босова
Задание 81. Установите соответствие между записанными на языке Паскаль фрагментами программ обработки одномерного числового массива и результатами их работы.
Код Паскаль Результат работы
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 then s:=s+a[i];		 Сумма всех элементов массива с четными номерами.
n:=1;
for i:=2 to 10 do
if a[i] 		Номер(индекс) минимального элемента массива.
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]>m then m:=a[i]; 		Значение наибольшего элемента массива.
z:=1;
for i:=1 to 10 do
if a[i]<>0 then z:=z*a[i]; 		Произведение ненулевых элементов массива.