Даны два массива А и В, состоящие из 6 элементов.

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

массивов. Вывести новый массив.

паскаль.

Question

Информатика

Борюха

2 января, 03:52

Даны два массива А и В, состоящие из 6 элементов.

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

массивов. Вывести новый массив.

паскаль.

+2

Ответы (2)

Знаете ответ на вопрос?

Евдокуша · Answer 1

Program z10;

VAR

a, b: Array [1 ... 6] of integer;

i:integer;

Begin

Randomize;

For i:=1 to 6 do

begin

a[i]:=random (999) ;

end;

For i:=1 to 6 do

begin

b[i]:=random (999) ;

end;

For i:=1 to 6 do

begin

write (a[i],' ', b[i],' ') ;

end;

end.

Асафий · Answer 2

Uses crt;

const n=6;

var i:integer;

a, b:array[1 ... 6] of integer;

begin

writeln ('Введите элементы массива A.') ;

for i:=1 to n do

read (a[i]) ;

writeln ('Введите элементы массива B.') ;

for i:=1 to n do

read (b[i]) ;

for i:=1 to n do

write (a[i],' ', b[i],' ') ;

end.

Даны два массива А и В, состоящие из 6 элементов.Объединить два массива в один массив с чередованием элементов исходныхмассивов. Вывести новый массив.паскаль.

Даны два массива А и В, состоящие из 6 элементов.

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

массивов. Вывести новый массив.

паскаль.