Двумерный массив. Является ли он симметричным относительно главной диагонали

@винт · Регистрация: 29.03.2012

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

дан двумерный массив с размерностью n на n. определить является ли данный массив симметричным относительно своей главной диагонали.

@kloks · 10.05.2012, 18:15

Если я правильно понял

Pascal

program ooe;
const n = 5;
var A : array[1..n, 1..n] of integer;
     ok : boolean;
     i, j : integer;
begin
  for i := 1 to n do
    for j := 1 to n do
      read(A[i,j]);
  ok := true;
  i := 1;
  while (i < n) and ok do
  begin
    j := i + 1;
    while (j <= n) and ok do
      if A[i, j] = A[j, i] then
        j := j + 1
      else
        ok := false;
    i := i + 1;
  end;
  if ok then
    writeln('Da')
  else
    writeln('Net');
  readln;
end.

@винт · 10.05.2012, 18:21 **[ТС]**

скорее всего по другому нужно сделать. а как правильно собственно сам не знаю

@винт 5 / 5 / 6 Регистрация: 29.03.2012 Сообщений: 29
		1
	Двумерный массив. Является ли он симметричным относительно главной диагонали 10.05.2012, 17:26. Показов 2363. Ответов 2 Метки нет (Все метки) дан двумерный массив с размерностью n на n. определить является ли данный массив симметричным относительно своей главной диагонали. 0

@винт 5 / 5 / 6 Регистрация: 29.03.2012 Сообщений: 29
	10.05.2012, 18:21 [ТС]	3
	скорее всего по другому нужно сделать. а как правильно собственно сам не знаю 0

Опции темы

Двумерный массив. Является ли он симметричным относительно главной диагонали

Решение