-Цитата от Тедди

окей, я уж разобрался. Надо было прописать array of array oa real как новый тип и с ним работать

Добавлено через 11 часов 2 минуты 30 секунд

Мужики, выручайте. Все прописал в проге, компилятор не ругается, а по выполнению возникают ошибки

Вот фрагменты, выделил строку , где ошибка. Никак не пойму, в чём только

-

if checkbox6.Checked = true then
begin
strok:= stringgrid1.rowcount;
stolb:= stringgrid1.colcount;
for i:=0 to strok - 1 do
for j:=0 to (stolb - 1) do
arr[i+1,j+1]:= strtofloat(stringgrid1.cells[i,j]);
Memo1.Lines.add(inttostr(rang(arr)));
end;

-

Function rang(a:Tarray): integer;
var i,j,k,kol,nul:integer;
begin
for j:=1 to stolb do
for i:=1 to strok do
for k:=1 to stolb do a[i,k]:= a[i,k] - ((a[i,j]/a[1,j]) * a[1,k]);
nul:=0;
for i:=1 to strok do
begin
kol:=0;
for j:=1 to stolb do if a[i,j] = 0 then kol:= kol+1 ;
if kol = strok then nul:= nul +1;
end;

бля, чувак, надо как бы условие задачи. это кстати не метод гаусса часом? я чё-то похожее на 1м курсе писал...
и бля, делай отступынихуя же непонятно
а в первом случае - ошибка скорее всего в том, что в стринггриде ячейки идут cells[i,j], где i - номер столбца, а j - номер строки. а у тебя наоборот. т.е. если у тебя матрица не квадратная - то вылазишь за пределы. скорее всего так
во втором случае я чо-та хуй знает без описания ошибки и условия задачи