Опредеитель матрицы, найдите ошибку Опции

[Ilius]

Не могу вызвать функцию определителя от переменной. Помогите.Посмотрите в чем ошибка. Очень надо!

Сообщение отредактировано: Ilius - 17.12.2007 23:49

[Ilius]

Короче сделал сам. И еще посмотрите почему пишет при компиляции этой процедуры(что то не то с индексами i и j?):

Код

procedure TForm1.umnnachClick(Sender: TObject);
var
   A, X  : TMatrix;
   i, j : integer;y:real;
begin
  y:=StrtoFloat(Edit1.Text);
   A:= TMatrix.Create( StringGrid1.RowCount, StringGrid1.ColCount);
   try // finally
      for i:=0 to StringGrid1.ColCount-1 do
         for j:=0 to StringGrid1.RowCount-1 do
            A[j, i]:= StrToFloat(StringGrid1.Cells[i,j]);
      X :=A.MultNum(y);
      for i:=0 to form2.StringGrid1.RowCount-1 do
      for j:=0 to form2.StringGrid1.ColCount-1 do
     form2.StringGrid1.Cells[i,j]:= floatTostr(X[i,j]);
     form2.Show;
     form1.Hide;
   finally A.Free;
   end;
end;

пишет:
[Warning] kalkulyator_matric.pas(426): FOR-Loop variable 'i' may be undefined after loop
[Warning] kalkulyator_matric.pas(423): FOR-Loop variable 'j' may be undefined after loop
[Warning] kalkulyator_matric.pas(426): Variable 'j' might not have been initialized

Сообщение отредактировано: Ilius - 19.12.2007 21:17