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