Помогите плиз написать программу :
Дан двумерный массив А, состоящий из N элементов. Найти минимальный из элементов этого массива с нечетными индексами и максимальный из элементов с четными индексами.

пишет : "Ошибка: ожидался идентификатор, но "var" обнаружено." через абц паскаль писал

попробуй обновить версию.

я писал на версии 3.3

var a: array [1..100, 1..100] of integer;begin var N := ReadInteger; var mmax := Integer.MinValue; var mmin := integer.MaxValue; for var j := 1 to N do for var i := 1 to N do begin read(a[j, i]); if (j mod 2 <> 0) and (i mod 2 <> 0) and (a[j, i] < mmin) then mmin := a[j, i]; if (j mod 2 = 0) and (i mod 2 = 0) and (a[j, i] > mmax) then mmax := a[j, i] end; writeln('Минимальный элемент массива с нечетным индексом: ', mmin); writeln('Максимальный элемент массива с четным индексом: ', mmax)end.

Пример:Ввод:31 2 34 5 67 8 9Вывод:Минимальный элемент массива с нечетным индексом: 1Максимальный элемент массива с четным индексом: 5