Поиск суммы элементов главной диагонали матрицы

@Mr_Bula · Регистрация: 29.04.2013

Author24 — интернет-сервис помощи студентам

Возникает ошибка при поиске суммы элементов главной диагонали матрицы, помогите пожалуйста.
https://www.cyberforum.ru/atta... 1414310417

@northener · 27.10.2014, 02:15

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

Возникает ошибка при поиске суммы элементов главной диагонали матрицы, помогите пожалуйста.

Чем же тебе помочь, болезный ты наш мистер двоешник/троешник, если ты не даёшь нам своего кода, который мы могли бы поправить.

@NIKOLAYY · 29.10.2014, 14:52

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

Возникает ошибка при поиске суммы элементов главной диагонали матрицы, помогите пожалуйста.

Где то вышел за предел таблицы видимо пытаешся посчитать сумму в тех ячейках которых нету.
У меня все работает:

Delphi

var
  Form1: TForm1;
  i, j: integer; //счетчик
  sum: Integer; //сумма по диагонали
implementation
 
{$R *.dfm}
 
procedure TForm1.Button1Click(Sender: TObject);
const
  n = 4;
begin
  //размерность таблицы
  StringGrid1.RowCount := n;
  StringGrid1.ColCount := n;
 
  //заполним таблицу
  for i := 0 to n - 1 do
    for j := 0 to n - 1 do
      StringGrid1.Cells[i, j] := IntToStr(Random(10));
 
  //считаем диагональ
  for i := 0 to n - 1 do
    for j := 0 to n -1 do
      if i = j then
        sum := sum + StrToInt(StringGrid1.Cells[i, j]);
  Label1.Caption:= 'Сумма по диаг = '+ (IntToStr(sum));
end;

@Mr_Bula 0 / 0 / 0 Регистрация: 29.04.2013 Сообщений: 100
		1
	Поиск суммы элементов главной диагонали матрицы 26.10.2014, 11:00. Показов 1325. Ответов 2 Метки нет (Все метки) Возникает ошибка при поиске суммы элементов главной диагонали матрицы, помогите пожалуйста. https://www.cyberforum.ru/atta... 1414310417 Миниатюры 0

@northener пофигист широкого профиля 4732 / 3167 / 858 Регистрация: 15.07.2013 Сообщений: 18,248
	27.10.2014, 02:15	2
	Сообщение от Mr_Bula Возникает ошибка при поиске суммы элементов главной диагонали матрицы, помогите пожалуйста. Чем же тебе помочь, болезный ты наш мистер двоешник/троешник, если ты не даёшь нам своего кода, который мы могли бы поправить. 0

	29.10.2014, 14:52

Опции темы

Поиск суммы элементов главной диагонали матрицы

Решение