Задание
Дан массив, состоящий из 5 целых чисел. Установите соответствие между условием задачи и фрагментом программы.
- Объекты 1
- Вычисление количества нечётных элементов массива.
- Вычисление суммы чётных элементов массива.
- Вычисление произведения положительных элементов массива.
- Вычисление среднего арифметического значения отрицательных элементов массива.
- Объекты 2
- s := 0;
for i := 1 to 5 do begin
if A\[i\]mod 2 = 0 then
s := s + A\[i\];
end;
writeln\(s\); - s := 0;
k := 0;
for i := 1 to 5 do
if A\[i\]< 0 then begin
s := s + A\[i\];
k := k + 1;
end;
s := s / k;
writeln\(s\); - s := 0;
for i := 1 to 5 do begin
if A\[i\]mod 2 <> 0 then
s := s + 1;
end;
writeln\(s\); - s := 1;
for i := 1 to 5 do begin
if A\[i\]> 0 then
s := s * A\[i\];
end;
writeln\(s\);
- s := 0;