Является ли матрица латинским квадратом

@МарияСтрук · Регистрация: 09.03.2018

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

12. латинский квадрат порядка N называется квадратная таблица размерности NхN, каждая строка и каждый столбец которой содержит все из цифр 1,2, ..., N. Данная целочисленная квадратная матрица порядка 5. Выяснить, является ли она латинским квадратом.

@Puporev · 02.04.2018, 17:53

Pascal

var a:array[1..20,1..20] of byte;
    m,m1,m2:set of 1..20;
    n,i,j,k:byte;
begin
write('Размер матрицы n=');
readln(n);
writeln('Заполните матрицу числами от 1 до ',n);
for i:=1 to n do
for j:=1 to n do
repeat
  write('a[',i,',',j,']=');
  readln(a[i,j]);
until a[i,j] in [1..n];
writeln('Введеная матрица');
for i:=1 to n do
 begin
  for j:=1 to n do
  write(a[i,j]:3);
  writeln;
 end;
m:=[1..n];
k:=0;
i:=1;
while i<=n do
 begin
  m1:=[];
  for j:=1 to n do
  m1:=m1+[a[i,j]];
  m2:=[];
  for j:=1 to n do
  m2:=m2+[a[j,i]];
  if(m1<>m)or(m2<>m) then
   begin
    k:=1;
    break;
   end
  else inc(i);
 end;
if k=0 then write('Это латинский квадрат')
else write('Это не латинский квадрат');
end.

@МарияСтрук 0 / 0 / 1 Регистрация: 09.03.2018 Сообщений: 75
		1
	Является ли матрица латинским квадратом 02.04.2018, 15:55. Показов 2065. Ответов 1 Метки нет (Все метки) 12. латинский квадрат порядка N называется квадратная таблица размерности NхN, каждая строка и каждый столбец которой содержит все из цифр 1,2, ..., N. Данная целочисленная квадратная матрица порядка 5. Выяснить, является ли она латинским квадратом. 0

Опции темы

Является ли матрица латинским квадратом

Решение