Объединение массивов в один с чередованием элементов исходных массивов

Объединить два массива А и В, содержащих по n элементов, в один массив С, который будет содержать 2n элементов, т.е. получить массив С=(a₁,b₁,a₂,b₂,….,a_n,b_n). Заметим, что индекс элемента массива С зависит от индекса пересылаемого в него элемента массива А или В: c_2i-1=a_i; c_2i=b_i. Таким образом, организовав цикл по параметру I от 1 до n, и выполняя для каждого I эти присваива­ния, мы решим задачу.

Используемые переменные:

Исходные данные:

A,В –массивы, размеров N;

N – количество элементов в массиве А и в массиве В;

Результат:

C- массив размером 2N;

Вспомогательные переменные:

I – индекс элементов массивов А и В.

Схема алгоритма изображена на рис 6.

Программный код:

FOR I:= 1 TO N DO begin C[2*I-1]:= A[I]; C(2*I) = B(I); end;

Writeln(‘Массив С’);

FOR I:= 1 TO N*2 do Writeln(‘C[I]);