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