Известно, что среди элементов массива два и только два равны между собой. Напечатать их индексы

@Beverly · Регистрация: 26.09.2013

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

Помогите, пожалуйста, решить задачу.

Дан двухмерный целочисленный массив А размером nхm. Известно, что среди его элементов два и только два равны между собой. Напечатать их индексы.

@ПерС · 07.12.2013, 12:03

Pascal

const n=4;m=3;
 a: array [1..n,1..m] of integer=(
  (1,2,3), (4,5,6), (7,8,9), (10,1,12)
 );
var i,j:integer;
begin
for i:=1 to n*m-1 do
for j:=i+1 to n*m do begin
 if a[(i-1)div m+1,(i-1)mod m+1]=a[(j-1)div m+1,(j-1)mod m+1] then begin
  writeln ((i-1)div m+1,' ',(i-1)mod m+1);
  writeln ((j-1)div m+1,' ',(j-1)mod m+1);
 end;
end;
readln;
end.

@Beverly 0 / 0 / 1 Регистрация: 26.09.2013 Сообщений: 51
		1
	Известно, что среди элементов массива два и только два равны между собой. Напечатать их индексы 05.12.2013, 21:21. Показов 1799. Ответов 1 Метки нет (Все метки) Помогите, пожалуйста, решить задачу. Дан двухмерный целочисленный массив А размером nхm. Известно, что среди его элементов два и только два равны между собой. Напечатать их индексы. 0

Опции темы

Известно, что среди элементов массива два и только два равны между собой. Напечатать их индексы

Решение