Задание:
Даны два массива А и В, состоящие из 6 элементов. Объединить два массива в один массив с чередованием элементов исходных массивов. Вывести новый массив. Паскаль.
Решение:
Uses crt; const n=6; var i: integer; a,b: array[1… 6] of integer; beginwriteln ('Введите элементы массива A.'); for i: =1 to n doread (a[i]); writeln ('Введите элементы массива B.'); for i: =1 to n doread (b[i]); for i: =1 to n dowrite (a[i],',b[i],'); end.
Знаете другой ответ?