Информатика, опубликовано 2018-08-22 20:56:00 by Гость

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

Ответ оставил Гость

var
  a: array[1..4, 1..4] of integer;
  i, j, s, n: integer;
begin
  for i := 1 to 4 do begin
    for j := 1 to 4 do begin
      a[i, j] := random(10);
      write(a[i, j], );
      inc(n);
      if(n mod 4 = 0) then writeln;
    end;
    s := s + a[i, i];
  end;
  writeln(s);
end.

Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.