Дан целочисленный двумерный массив, размерности n х m, при n=3; m=3. Сформировать новый массив, состоящий из противоположных соответствующих элементов, то есть значение элемента А(n;m) заменить на значение элемента А (m;n). (pascal)
Ответ
0
(0 оценок)
0
tyngpuk
2 года назад
Светило науки - 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.
n х[ m - это не размерность, а размер. Размерность этого массива равна 2 - строки и столбцы.