[sidoro89]

Есть код.
в отдельном модуле:

Код:

type
  TMatrixData = array of array of Extended;

  TMatrix = class
  protected
    FData: TMatrixData; 
    FOrigin: Integer; 
...

procedure TForm1.btn1Click(Sender: TObject);
var
  A, B:TMatrix;
  C,D:TMatrixData;
  s:extended;
  i,j: Integer;
begin
  SetLength(C,3,3) ;
  SetLength(D,3,3) ;
  for i:=0 to 2 do
  for j:=0 to 2 do
  begin
    C[i,j]:=i+j+2;
    D[i,j]:=i*j-3;
  end;
  A:=TMatrix.Create(C);
  B:=TMatrix.Create(D);
  S:=C[0,0];
  A.Free;
  B.Free;
end;

Админ: Пользуемся тегами для оформления кода.

По логике вещей в переменной S должно быть значение матрицы С[0,0], а там 1е+300, как вытащить значение из массива? Что происходит?