Дано одномерный массив a. max(a2,a3,.,a2k)+min(a1,a3,.,a(2k+1) - Turbo Pascal
Формулировка задачи:
// где у меня ошибка?
Решение задачи: «Дано одномерный массив a. max(a2,a3,.,a2k)+min(a1,a3,.,a(2k+1)»
textual
Листинг программы
for i:=0 to 50 do if odd(i) then begin if a[i]<min then min:=a[i]; end else if a[i]>max then max:=a[i];
Объяснение кода листинга программы
В данном коде происходит поиск минимального и максимального значения в одномерном массиве a. Для этого используется цикл for, который проходит по всем элементам массива от 0 до 50 (в данном случае, но это может быть любой другой диапазон). Если текущий индекс i является нечетным числом, то проверяется значение элемента a[i]. Если оно меньше минимального значения, то минимальное значение присваивается переменной min. Если же значение элемента a[i] больше максимального значения, то максимальное значение присваивается переменной max. Таким образом, после завершения цикла, в переменной min будет храниться минимальное значение, а в переменной max - максимальное значение массива a.