Найти максимальный из элементов, имеющих четный индекс. Пример: массив 7 2 6 5 4 4 10 3 9 элементы с четными индексами 2 5 4 3 максимальный из них 5. Паскаль АВС. — Правильный ответ на вопрос найдете ниже

Ответ: const  n = 15;var  x: array[1..n] of integer;  i, max: integer;begin  Randomize;  Write(‘Элементы массива: ‘);  for i := 1 to n do  begin    x[i] := Random(20);    Write(x[i]:3)  end;  max := x[2]; i := 4;  while i <= n do  begin    if max < x[i] then max := x[i];    i := i + 2  end;  Writeln;  Writeln(‘Max=’, max)end.Тестовое решение:Элементы массива:  17 12 18 12 11 14 18 19 16 16  9 13  7  3 13Max=19