Предмет: Информатика, автор: dox1g

Задан двумерный массив 4*4.Получить одномерный массив элементами которого будут элементами главной диагонали двумерного массива

Ответы

Автор ответа: APALoff
0
Var
  m : array[1..4,1..4] of Integer;
  m_new : array[1..4] of Integer;
  i,j : Integer;
Begin
  For i:=1 to 4 do
  Begin
    For j:=1 to 4 do
    Begin
      m[i,j]:=Random(100);
      Write(m[i,j]:5);
      If i=j then m_new[i]:=m[i,j];
    end;
    Writeln;
  end;
  Writeln('Главная диагнональ: ');
  For i:=1 to 4 do Write(m_new[i]:5);
  Writeln;
end.
Автор ответа: dox1g
0
На бейсике там не влезло
Автор ответа: APALoff
0
Это не "там не влезло", а "я не умею пользоваться клавиатурой и копипастить, поэтому привёл условие задачи не полностью".
Автор ответа: dox1g
0
Нет такое полное условие
Автор ответа: APALoff
0
мда... Вы еще и знаками препинания пользоваться не умеете
Похожие вопросы
Предмет: Химия, автор: Аноним
Предмет: Физика, автор: stalin242006
Предмет: Химия, автор: Nikk1326