Определить ближайший элемент массива к заданному числу

[wowan]

Задание:
1.Вычислить значения 33 элементов одномерного целочисленного массива F в интервале (-6;10) с использованием генератора случайных чисел.

2.Определить элемент,самый близкий к заданному числу С среди нечетных по номеру элементов второй четверти.

может кто напишет текст программы Второго задания, если не затруднит? Первое задание уже сам расписал.А вот со вторым не получается.

[Mad_Cat]

r:=9;{проверяем с №8 по №16 }
for i:=11 to 15 do
if odd(i) and (abs(a[i]-c)<abs(a[r]-c)) then r:=i;
writeln('элемент,самый близкий к заданному числу С среди нечетных по номеру элементов второй четверти:',a[r]);