Дан целочисленный двумерный массив, размерности n х m, при n=3; m=3. Сформировать новый массив, состоящий из противоположных соответствующих элементов, то есть значение элемента А(n;m) заменить на значение элемента А (m;n). (pascal)

n х[ m - это не размерность, а размер. Размерность этого массива равна 2 - строки и столбцы.

Ответ
0 (0 оценок)
0
tyngpuk 3 года назад
Светило науки - 481 ответ - 0 раз оказано помощи

Ответ:

const n=3; m=3;

var im,nm: array [1..n,1..m] of integer;

i,j:integer;

begin

writeln('Исходный массив');

for i:=1 to n do

begin

for j:=1 to m do

begin

im[i,j]:=random(10);

write(im[i,j]:2)

end;

writeln

end;

writeln('Новый массив');

for i:=1 to n do

begin

for j:=1 to m do

begin

nm[i,j]:=im[j,i];

write(nm[i,j]:2)

end;

writeln

end

end.

Остались вопросы?