Преобразование двумерного массива в одномерный...

[S.Mihail]

Всем привет.Прошу помочь с преобразованием двумерного массива в одномерный. На каком-нибудь не сложном примере с пояснением. Зарание спасибо.

[p51x]

В смысле "преобразование"? Я могу тысчу вариантов такого "преобразования" придумать... Что вы хотели?

[vlad_light]

var
arr1:array[1..255,1..255] of integer; //заданный двумерный массив
arr2:array[1..255] of integer;  //новый одномерный массив
k,i,j,m,n:integer; //i,j,k - счётчики; n,m - длинна и ширина двумерного массива
// 1<=i<=n, 1<=j<=m, 1<=k<=m+n
begin
k:=1;
for i:=1 to n 
  for j:=1 to m //пробегаем весь двумерный массив
    arr2[k]:=arr1[i,j];  //заносим значение каждой компоненты в новый массив
    inc(k);  //увеличиваем счётчик на 1 (счётчики i,j увеличиваются автомтически)
end.

[S.Mihail]

ну например :

const n=2;
m=5;
k=2*(m);
type mass=array[1..n],[1..m] of word;
mass1=array[1..k] of word; {k - должно равняться количеству ячеек в двумерном массиве}

const yourmassiv:mass=((3,2,1,5,4),
(7,8,9,6,10));
var freemassiv:maass1;
i,j,k: word;

у меня есть такой массив, хочу сделать сортировку, но перед этим записать его, как одномерный. Значит следуя из предыдущего примера мне необходимо.....

begin
k:=1;
for i:=1 to m do
for j:=1 to n do
freemassiv[k]:=yourmassiv[i,j];
inc(k);
end.
.....и этого будет достаточно, чтобы паскаль в каждую ячейку пустого одномерного массива поместил значение двумерного, соответствующее номеру ячейки.

[Stilet]

Все гораздо проще чем вы думаете, господа корнеты:

var
 arr1:array[1..10,1..5] of integer; //заданный двумерный массив
 arr2:array[1..10*5] of integer;  //новый одномерный массив
 i,j:integer;
begin
for i:=1 to 10 do begin
  for j:=1 to 5 do
    begin arr1[i,j]:=random(10);write(arr1[i,j]:5);end;
  writeln;
end;
writeln;
move(arr1,arr2,sizeof(arr2));
for i:=1 to 10*5 do begin
     write(arr2[i]:5);
end;
readln;
  { TODO -oUser -cConsole Main : Insert code here }
end.

vlad_light

Ты бы проверил бы свой код, что ли...

[OLGApr]

помочь != "решите за меня"!
помогите................Разработать алгоритм и написать программу на языке Turbo Pascal. Задана матрица (двумерный массив) A размером NxМ, состоящая из действительных элементов.Получить новую матрицу путем вычитания всех элементов данной матрицы из ее наибольшего по модулю элемента. Преобразовать исходную матрицу в одномерный массив. Вывести на экран полученную матрицу и вектор