Дано целое число N(amp;gt; 0). Сформировать и вывести целочисленный массив

Дано целое число N(gt; 0). Сформировать и вывести целочисленный массив размера N,содержащий N первых отрицательных нечетных чисел: -1, -3, -5, .
Описание массива:

a) Const n1=5; n2=30; n1-номер первого элемента, а n2-номер заключительного элемента.

Type Myarray=Array [n1..n2] Of Integer;

Var A: Myarray;

b) Const n=30; n-это количество частей массива

Type Myarray=Array [n1..n2] Of Integer;

Var A: Myarray;

c) Var A: Array [1..n] Of Integer;
Программка Обязана ИМЕТЬ Функцию...