Дан массив A размера N найти минимальный элемент из его элементов с нечетными…

Const N=10; var i, m: integer; a: array [1… N] of integer; begin for i: =1 to N do begin a[i]: =random (50) — 25; writeln ('[', i, '] => ', a[i]); end; i: =1; while (i <= N) do begin if (m > a[i]) then m: =a[i]; i: =i+2; end; writeln (m); end.