переделать массив из статического в динамический

[DomiNick]

mas:= random(10);

о_О


Я б тоже ругался...
Как можно присвоить массиву число? Где "номер" элемента массива?

[Saka]

Ребят, ну помогите с кодом. я честно незнаю как переделать из статического в динамический

[DomiNick]

Да динамический он уже...

Сравните код из первого поста и из девятого... Там очепятка, зачем поменяли

mas[i, j] := random(10);

на

mas:= random(10);

?

Где "номер" элемента-то?

[Saka]

при таком условии вылезает одна строчка, а по условию нужна матрица. условие:
Дана действительная квадратная матрица порядка n. Найти наибольшее из значений элементов , расположенных в заштрихованной части матрицы.

Вот сам код:

program Project2;

{$APPTYPE CONSOLE}

uses
  SysUtils;

const
  n = 4;
var
  mas: array of array of byte;
  i, j, m: byte;

begin
    { TODO -oUser -cConsole Main : Insert code here }
 setlength(mas,n,n);
  randomize;
  for i := 0 to n-1 do
  begin
    for j := 0 to n-1 do
    begin
      mas[i,j]:= random(10); //ошибка [DCC Error] Project2.dpr(22): E2010 Incompatible types: 'Dynamic array' and 'Integer'
      write(mas[i, j]:2)
        end;

    writeln;
    readln;
  end;
           SetLength(mas,n);
  m := mas[2, 1];
  for i := 1 to n do
  for j := 1 to i - 1 do if mas[i, j] > m then m := mas[i, j];
  writeln('Max = ', m);
  readln;
  readln;
end.