Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal (Паскаль)

Войти
Регистрация
Восстановить пароль
 
Alligator163
0 / 0 / 0
Регистрация: 21.02.2010
Сообщений: 3
#1

Индексы одинаковых элементов в матрице - Pascal

21.02.2010, 21:05. Просмотров 725. Ответов 2
Метки нет (Все метки)

Дан двумерный целочисленный массив А(2, 10). Известно, что среди его элементов два и только два равны между собой. Напечатать их индексы. Для удовлетворительного решения этой задачи надо не брать для сравнения одну и ту же пару элементов (A[i][j], A[p][q]) дважды и не запутаться в случаях, когда i = p и j = q.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.02.2010, 21:05
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Индексы одинаковых элементов в матрице (Pascal):

Дана целочисленная матрица А(10,10). Если на главной диагонали матрицы есть хотя бы два одинаковых элемента, то найти в матрице индексы минимального э - Pascal
Дана целочисленная матрица А(10,10). Если на главной диагонали матрицы есть хотя бы два одинаковых элемента, то найти в матрице индексы...

В матрице определить индексы равных элементов - Pascal
Составить программу, которая для задаваемого пользователем двумерного числового массива размером n*n, содержащего ровно два одинаковых...

Матрицы. Поиск одинаковых элементов в матрице - Pascal
Дана матрица А(nxn).Написать программу поиска одинаковых элементов в этой матрице

написать программу поиска одинаковых элементов в матрице - Pascal
дана матрица а(н*н). написать программу поиска одинаковых элементов в этой матрице

В данной матрице вычислить наибольшие элементы с отрицательных элементов рядков, которые имеют парные индексы. - Pascal
Помогите плиз с задачкой! В данной матрице В(7,3) вычислить наибольшие элементы с отрицательных элементов рядков, которые имеют парные...

Найти минимальный и максимальный элементы в матрице и их индексы - Pascal
Кто сможет помоч,с меня +. Заполнить матрицу из 3 строк и 4 столбцов,,случайными числами и вывести на экран.найти мин. и макс. элементы в...

2
Puporev
Модератор
52816 / 40627 / 13880
Регистрация: 18.05.2008
Сообщений: 94,226
21.02.2010, 21:30 #2
Вот программа, замените k,l на p,q, не заметил.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
uses crt;
const m=2;
      n=10;
var a:array[1..m,1..n] of integer;
    i,j,k,l,i1,j1,i2,j2:byte;
begin
clrscr;
randomize;
writeln('Введите элементы матрицы, в том числе 2 одинаковых:');
for i:=1 to m do
for j:=1 to n do
 begin
  write('a[',i,',',j,']=');
  readln(a[i,j]);
 end;
clrscr;
writeln('Матрица A:');
for i:=1 to m do
 begin
  for j:=1 to n do
  write(a[i,j]:3);
  writeln;
 end;
for i:=1 to m do
for j:=1 to n do
for k:=1 to m do
for l:=1 to n do
if (a[i,j]=a[k,l])and((i<>k)or(j<>l)) then
 begin
  i1:=k;
  j1:=l;
  i2:=i;
  j2:=j;
 end;
writeln('Одинаковые элементы a[',i1,',',j1,']=',a[i1,j1],' и a[',i2,',',j2,']=',a[i2,j2]);
readln
end.
1
Alligator163
0 / 0 / 0
Регистрация: 21.02.2010
Сообщений: 3
22.02.2010, 14:28  [ТС] #3
Спасибо огроменное)
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
22.02.2010, 14:28
Привет! Вот еще темы с ответами:

В заданной целочисленной матрице 6x6 вывести индексы всех ее седловых точек - Pascal
В заданной целочисленной матрице 6x6 вывести индексы всех ее седловых точек (элемент матрицы называется седловой точкой, если он является...

В матрице 8х8 из вещественных чисел в пределах от -20 до 20 найти наибольший элемент главной диагонали и определить его индексы - Pascal
В матрице 8х8 из вещественных чисел в пределах от -20 до 20 найти наибольший элемент главной диагонали и определить его индексы. Вывести...

Найти сумму отрицательных элементов массива вывести на экран индексы всех отрицательных элементов - Pascal
дан масcив в котором N чисел. найти сумму отрицательных элементов массива вывести на экран индексы всех отрицательных элементов

Записать в массив индексы элементов - Pascal
Здравствуйте, помогите пожалуйста с задачкой, а то что-то я ни как не могу понять как ее решить..:( Вот текст задачи:Дана матрица А и...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.