Паскаль

[mandarinki]

Помогите пожалуйста решить две несложные задачи. Я зык программирования: Паскаль
1. Сформировать и вывести одномерный массив содержащий N первых положительных нечетных значении:1 3 5...


2. Дан массив A из N целых чисел. Все его элементы кроме одного упорядоченны по возрастанию. Переместить значение этого элемента на такую позицию в массиве чтобы все N элементов оказались упорядоченными по возрастанию. Методы сортировок для всего исходного массива не использовать

Большое спасибо всем, кто поможет!

[Chudo4258]

1. Сформировать и вывести одномерный массив содержащий N первых положительных нечетных значении:1 3 5...

a[1]:=1;
for i:=2 to n do
 a[i]:=a[i-1]+2;
for i:=1 to n do
 write(a[i],'  ');

[mandarinki]

Спасибо большое)
А вторая задача?