А) ствол (ствол дерева и ствол ружья)б) кмпеть (вода кипит. Работа кипит)в) грязь и слякотьг) коса (девичья и которой траву косят)д) иммельман (маневр самолета)
Из условия видно, что спрашивается количество чисел в массиве, больших 25.
Ответ: 6.
Function func32707155(a As Range) As Integer
Dim i, j, odd_num, even_num, min_max(2) As Integer, r As Range
odd_num = Cells(a.Row, a.Column)
even_num = Cells(a.Row + Sgn(a.Rows.Count - 1), a.Column + Sgn(a.Columns.Count - 1))
j = 0
For Each r In a
j = j + 1
i = j Mod 2
min_max(i) = i * Application.max(odd_num, r) + (1 - i) * Application.min(even_num, r)
Next
func32707155 = min_max(1) + min_max(0)
End Function
Excel VBA
111, 34, 76, A2 -------------------------