Создать новый массив из двух delphi

[Муцк]

Создать новый массив из двух.Из первого взять все элементы на нечетных местах,из второго все нечетные элементы.Дайте пожалуйста код программки примерный,если кто уже делал,а то на форуме 1000 страниц-полистал,ничего не нашёл,поиск тоже результатов не дал.

[Serge_Bliznykov]

1) ответить (себе) на вопрос, какие массивы - динамические или статические.

2) написать определение переменных для исходных массивов, для результирующего массива, заполнить исходные массивы (например, через random) и выполнить два цикла:

for i:=Low(Massiv1) to High(Massiv1) do
  if odd(i) then Поместить_Элемент_Первого_Массива Massiv1[i] -> в результирующий массив;

цикл 2
for i:=Low(Massiv2) to High(Massiv2) do
  if odd(Massive2[i]) then Поместить_Элемент_Второго_Массива Massiv2[i] -> в результирующий массив;

вот и всё. остаются мелкие технические детали, как задавать размеры массивов и как добавлять элементы в результирующий массив...