Является ли заданная матрица симметричной относительно главной диагонали, Матрица 10-го порядка Опции

[Вика]

Программа. Определить, является ли заданная целая квадратная матрица 10-го порядка симметричной (относительно главной диагонали).

[Федосеев Павел]

Анастасия))), регайся и будешь уже как Форумчанка тренироваться на таких задачках. Двоечников на всех хватит - только сильно не некрофильствуй при выборе топиков!

А я бы проверял, наверное, так

  bSymmetric:=true;
  for i:=1 to n do
    for j:=i+1 to n do
      bSymmetric:=bSymmetric AND (a[i, j]=a[j, i]);
  if bSymmetric then
    WriteLn('Yes!!!!!!!!!!!!!!!!!!!!!)
  else
    WriteLn('No, No, No.);