2 / 2 / 0
Регистрация: 17.12.2012
Сообщений: 58
1

Найти все неповторяющиеся элементы двухмерного массива

02.06.2014, 21:33. Показов 1029. Ответов 0
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Помогите с блок схемой!!!!

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
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
program lab;
uses crt;
const nmax=20;
var a:array[1..nmax,1..nmax] of integer;
    x:integer;
    n,m,i,j,p,q,k:byte;
begin
writeln('Поиск неповторяющихся  элементов двухмерного массива целых чисел');writeln;
randomize;
repeat
write('Введите количество строк...');
read(m);
until m in [1..nmax];
repeat
write('Введите количество столбцов...');
read(n);
 write('Введите элементы двухмерного массива:');writeln;
until n in [1..nmax];
for i:=1 to m do
 begin
   for j:=1 to n do
    begin
write('  [',i,',',j,']...');
readln(a[i,j]);
 
    end;
 
 end;
writeln('Исходная матрица:');
 
for i:=1 to m do
 begin
   for j:=1 to n do
    begin
 
     write(a[i,j]:4);
    end;
   writeln;
 end;
writeln;
writeln('Неповторяющиеся элементы массива:');writeln;
for i:=1 to m do
for j:=1 to n do
 begin
  x:=a[i,j];
  k:=0;
  for p:=1 to m do
  for q:=1 to n do
  if a[p,q]=x then k:=k+1;
  if k=1 then write(x,' ');
 end;
end.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
02.06.2014, 21:33
Ответы с готовыми решениями:

Найти все неповторяющиеся элементы двухмерного массива целых чисел
решите задачу с помощю подпрограммы !!! задача(330): найти все неповторяющиеся элементы...

Найти все неповторяющиеся элементы двумерного массива
Решите, пожалуйста. Найти все неповторяющиеся элементы двумерного массива целых чисел...

Найти все неповторяющиеся элементы матрицы
Найти все неповторяющиеся элементы двумерного массивацулых чисел.

Заменить все элементы k-й строки и s-го столбца двухмерного массива на противоположные по знаку
Заменить все элементы k-й строки и s-го столбца двухмерного массива на противоположные по знаку...

0
02.06.2014, 21:33
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.06.2014, 21:33
Помогаю со студенческими работами здесь

Найти неповторяющиеся члены массива
Даны целые числа а1,а2...а15 ( могут быть повторяющиеся члены). Получить все числа, которые входят...

Сформировать массив L из массивов A и B путем их слияния так, чтобы сначала располагались все элементы массива A, а затем все элементы массива B.
Задан массив A из N элементов и массив B из M элементов. Сформировать массив L из массивов A и B...

Найти все элементы массива, меньшие среднего арифметического остальных элементов массива.
Дан одномерный числовой массив. Найти все его элементы, меньшие среднего арифметического остальных...

Найти среднее арифметическое положительных элементов массива и умножить на него все элементы массива
С клавиатуры вводится произвольный одномерный массив типа Integer (не более 10 элементов), после...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru