Question

как в Делфи в таблице TStringGrid подсчитать среднее арифметическое первой строки
если дан массив 10*10

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
  s: Integer;
  Average: double;
begin
  s:=0;
  for i := 1 to 10 do
    s := s + StrToInt(StringGrid1.Cells[1,i]);

  Average:=s/10;

  //Естественно в сроке StringGrid1.Cells[1,i] изначально должны быть данные, иначе произойдёт исключительная ситуация
end;

Answer 2

задание
Дан двумерный массив размерности 10х10. Заполнить его случайными числами на отрезке [-25,25]. Найти среднее арифметическое элементов первой строки. Вывести исходный массив и полученный результат на печать.

Answer 3

всё правильно, begin перед s:=0 к чему относится.

Answer 4

всё правильно - в смысле что есть ошибки.

Answer 5

я не знаюпочему выдает ошибки

Answer 6

я уже писал у тебя часть кода вне обработчика кнопки - поэтому и ошибки