Question

Дан целочисленный двумерный массив, размерности n×m, при n=3 m=6. Поменять местами первый и последний элемент. На pascal

Answer 1

program study235;

const n = 3;

         m = 6;

type mas = array [1..n, 1..m] of integer;

var a: mas;

     i, j, temp: Integer;

begin

writeln('Дан целочисленный двумерный массив, размерности n × m, при n = 3 m = 6. Поменять местами первый и последний элемент.');

writeln;

randomize;

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

for i := 1 to n do

 for j := 1 to m do

 begin

 a[i, j] := random(201);

 write(a[i, j], '; ');

 if (j = 6) then writeln;

 end;

temp := a[1, 1];

a[1, 1] := a[3, 6];

a[3, 6] := temp;

writeln;

writeln('Преобразованный массив:');

for i := 1 to n do

 for j := 1 to m do

 begin

  write(a[i, j], '; ');

  if (j = 6) then writeln;

 end;

readln;

end.

Answer 2

Вы можете поменять местами первый и последний элемент в целочисленном двумерном массиве размерности 3x6 на Pascal следующим образом:

pascalCopy code
program SwapElements;

const
  n = 3;
  m = 6;

var
  arr: array[1..n, 1..m] of Integer;
  i, j, temp: Integer;

begin
  // Заполните массив данными (вашими числами) или воспользуйтесь генерацией случайных чисел.
  // В этом примере используется случайная генерация для иллюстрации.
  Randomize;
  for i := 1 to n do
    for j := 1 to m do
      arr[i, j] := Random(100); // Здесь 100 - максимальное значение случайных чисел.

  // Выведем исходный массив для наглядности.
  Writeln('Исходный массив:');
  for i := 1 to n do
  begin
    for j := 1 to m do
      Write(arr[i, j]:4);
    Writeln;
  end;

  // Меняем местами первый и последний элемент в массиве.
  temp := arr[1, 1];
  arr[1, 1] := arr[n, m];
  arr[n, m] := temp;

  // Выводим массив после замены элементов.
  Writeln('Массив после замены:');
  for i := 1 to n do
  begin
    for j := 1 to m do
      Write(arr[i, j]:4);
    Writeln;
  end;

  Readln;
end.

Этот код создает двумерный массив размерности 3x6, заполняет его случайными числами, затем меняет местами первый и последний элемент массива и выводит результаты до и после замены. Вы можете заменить случайную генерацию чисел своими значениями, если необходимо.