делфи!!!поиск среднего арифметического в массиве...не работает программа

[reijii_nia]

нужно составить программу которая считает среднее арифметическое по строкам в двумерном массиве и выводит максимальное среднее в edit.вроде все сделал...но при запуске выдает ошибку...ума не приложу что не так...
сама прога и скрин ошибки прилагаются[ATTACH]lab5.rar[/ATTACH]

[type_Oleg]

Объявлено

 a:array[1..4,1..5] of real;

.. а обращаетесь к индексам 0:

 for i:=0 to 3 do
 for j:=0 to 4 do
begin
 a[i,j]:=Random*(10);
// ...

Поэтому и аццесс виолацион

[reijii_nia]

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

Объявлено

 a:array[1..4,1..5] of real;

.. а обращаетесь к индексам 0:

 for i:=0 to 3 do
 for j:=0 to 4 do
begin
 a[i,j]:=Random*(10);
// ...

Поэтому и аццесс виолацион

спасибо...разобрался...а можешь подсказать как в делфи числа округлять до 2 знаков после запятой...
в этом коде

Randomize;
for i:=0 to 3 do
for j:=0 to 4 do
begin
a[i,j]:=Random*(10);

[apromix]

Это

StringGrid1.Cells[j,i]:=floattostr(a[i,j]);

замени на

StringGrid1.Cells[j,i]:=formatfloat('0.##', a[i,j]);

[reijii_nia]

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

Это

StringGrid1.Cells[j,i]:=floattostr(a[i,j]);

замени на

StringGrid1.Cells[j,i]:=formatfloat('0.##', a[i,j]);

благодарю)))