паскаль,массивы,задача

[Тишка]

Соедините две матрицы А и Б в новой матрице С,поставив элем А на нечёт места, элементы Б на чётные... поможите люди бодрые)))

[Hacker19_90]

for i := 1 to n do
    for j := 1 to m do
        if ((j mod 2) = 0) then C[i,j] := B[i,j]
        else C[i,j] := A[i,j]

Типа так?

[Niro]

Держите

for i:=1 to n do
if i mod 2=0 then c[i]:=b[i] else c[i]:=a[i]

Но учтите, что на нечетные места в матрицу С попадают элементы из нечетных номеров матрицы А

[Тишка]

Хм...я просто думал,что массив С изначально в два раза больше,ну и все элементы и А и Б в него входят.Это реально сделать? Или вот почему не получалось?