delphi. Вычислить сумму элементов каждой строки матрицы А (n x m), определить наименьшее значение этих сумм и номер (первокурсник)

[XE5]

for i:=1 to n do begin
for j:=1 to n1 do begin
if StringGrid1.Cells[i,j] = '' then begin
ShowMessage('А почему ячейка ' + IntToStr(i) + ' ' + IntToStr(j) + 'Пуста??? У кого кривые руки???');
StringGrid1.Cells[i,j] := '0';
end;
x[i,j]:= strtoint(StringGrid1.Cells[i,j]);
begin
  sum:= sum + x[i,j];
  Memo1.Lines.Add('Сумма элементов '+inttostr(i)+'-ой строки = '+inttostr(sum));
end;

[Serge_Bliznykov]

Помимо всего сказанного, а что, никого не смущает, что в матрице явно ВЕЩЕСТВЕННЫЕ числа,
которые, при чтении матрицы пытаются преобразовать в целые?!

hrustnik, зачем Вам FormatFloat ?!
Используйте вместо неё банальную IntToStr()


добавлено через 4 минуты

Сообщение от Stilet

А можно поинтересоваться зачем тебе выводить целые числа в виде вещественных?

hrustnik, Вы совершенно напрасно проигнорировали этот вопрос/совет Stilet'а...