[Shelby]

что здесь не так?

procedure TForm1.rzm(AStringGrid: TStringGrid);
var
i, j:integer;
a:array[1..6,1..6] of integer;
begin
for i:=0 to sp1.value-1 do
for j:=0 to sp1.value-1 do
a[i,j]:=strtoint(astringgrid.cells[i,j]);
astringgrid.cells[i,j]:=inttostr(a[i,j]);
end;

[W1ndow]

Какая ошибка вывелась?

Предположу 2 вещи, это либо что-то с размерами стрингрида, или ошибка возникает при переводе текста из стрингрида в массив, возможно получается что ты символ(не цифру) пытаешь в число перевести.

[Shelby]

Не, тут для ручного ввода.
Типа, мы из стрингрида переносим цифры в массив, и сразу же обратно
Но всё уже понял, я просто во второй стрингрид не вводил цифры и поэтому вылазила ошибка )))