Question

Создать одномерный массив из 16 элементов. Вычислить максимальное значение из элементов, имеющих четные индексы.

Answer 1

// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
var a:= ArrRandom(16);a.Println;
Writeln(a.Where((v,i) -> (i+1).isEven).Max);
end.

Пример:
98 88 1 68 45 8 66 97 67 23 94 49 22 83 16 93
97

Answer 2

Конечно, вот пример решения этой задачи на языке Python:

# Создаем одномерный массив из 16 элементов
arr = [3, 15, 7, 8, 12, 10, 5, 20, 18, 22, 4, 9, 13, 11, 6, 17]

# Вычисляем максимальное значение из элементов с четными индексами
max_value = max(arr[::2])  # Используем срез [::2], чтобы выбрать элементы с четными индексами

print("Максимальное значение из элементов с четными индексами:", max_value)

В данном примере:

1. Мы создали одномерный массив `arr` из 16 элементов. 2. С помощью среза `[::2]` мы выбрали элементы массива, имеющие четные индексы. 3. Затем функция `max()` была использована для вычисления максимального значения из выбранных элементов.

Этот код выведет на экран максимальное значение из элементов массива `arr`, имеющих четные индексы. Вы можете изменить значения элементов массива `arr` или его размер, чтобы выполнить эту задачу для других данных.