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

@RIONOMARU · Регистрация: 08.12.2011

Написать программу, с использованием вложенных процедур или функций, которая преобразует одномерный массив, состоящий из 100 элементов, в двухмерный массив размера 10x10. Элементы массива заполняются случайными числами

DenNik · 24.01.2012, 18:36

держи. Надеюсь, все понятно

Delphi

var
  Form1: TForm1;
  // одномерный массив
  arr100: array[0..99] of word;
  // двумерный массив
  arr10: array[0..9] of array[0..9] of word;
 
...
 
procedure TForm1.Button1Click(Sender: TObject);
var
  i,x,y: byte;
begin
  Randomize;
 
  // заполнение одномерного массива
  for i:= 0 to High(arr100) do
    arr100[i]:= Random(1000);
 
  // чтение из одномерного и запись в двумерный
  i:= 0; // счетчик прочитанного элемента массива
  for y:= 0 to 9 do
  for x:= 0 to 9 do
  begin
    arr10[x,y]:= arr100[i];
    Inc(i);
  end;
end;

murderer · 25.01.2012, 17:46

Задание бессмысленое. Одномерный массив эквивалентен двумерному.

Delphi

type
  TArr1D=array[0..99] of word;
  TArr2D=array[0..9,0..9] of word;
var
  a: TArr1D;
  b: TArr2D;
begin
  b:=TArr2D(a);
end;

DenNik · 25.01.2012, 18:05

Сообщение от murderer

Задание бессмысленое. Одномерный массив эквивалентен двумерному.

Delphi

type
  TArr1D=array[0..99] of word;
  TArr2D=array[0..9,0..9] of word;
var
  a: TArr1D;
  b: TArr2D;
begin
  b:=TArr2D(a);
end;

я не такой продвинутый программист, но это смахивает на бред. Как может одномерный массив быть эквивалентен двумерному, если они по-разному размещаются в памяти? Модеры, ваше веское слово!

murderer · 25.01.2012, 18:32

Расположение в памяти такое, что например если ты напишешь:

Delphi

b[y,x]

Это будет приблизительно то же самое, что и

Delphi

a[y*10+x]

Но это верно только для статических массивов.

DenNik · 26.01.2012, 16:05

Сообщение от murderer

Расположение в памяти такое, что например если ты напишешь:

Delphi

b[y,x]

Это будет приблизительно то же самое, что и

Delphi

a[y*10+x]

Но это верно только для статических массивов.

с этим я согласен, выглядит логически правильно, но разве можно присваивать один массив другому, как в примере?

@RIONOMARU 0 / 0 / 0 Регистрация: 08.12.2011 Сообщений: 24
		1
	Преобразование одномерного массива в двухмерный 24.01.2012, 17:06. Показов 2546. Ответов 5 Метки нет (Все метки) Написать программу, с использованием вложенных процедур или функций, которая преобразует одномерный массив, состоящий из 100 элементов, в двухмерный массив размера 10x10. Элементы массива заполняются случайными числами __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

Опции темы