Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
Bassist
1 / 1 / 1
Регистрация: 12.04.2012
Сообщений: 34
1

Удалить из массива элементы, встречающиеся более одного раза

02.10.2012, 23:09. Просмотров 1246. Ответов 4
Метки нет (Все метки)

Здравствуйте, подскажите пожалуйста. Имеется некий массив, содержащий положительные и отрицательные эллементы, каким способом можно исключить из него положительные эллементы встречающиеся более одного раза?
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
02.10.2012, 23:09
Ответы с готовыми решениями:

В матрице найти элементы, встречающиеся более одного раза
Если не трудно, помогите решить задачу.(Желательно с пояснениями). Заранее спасибо В матрице...

Удалить из массива все элементы встречающиеся ровно 2 раза
Помогите пожалуйста с задачей на тему массивов: Дан целочисленный массив размера N. Удалить из...

Удалить из массива все элементы, встречающиеся более двух раз
Дан целочисленный массив размера N. Удалить из массива все эле- менты, встречающиеся более двух...

Строка: Убрать из текста буквы, встречающиеся более одного раза.
Помогите пожалуйста с задачей: Убрать из текста буквы, встречающиеся более одного раза.

Дан целочисленный массив размера N. Удалить из массива все элементы, встречающиеся ровно два раза
Дан целочисленный массив размера N. Удалить из массива все элементы, встречающиеся ровно два раза....

4
CodeR
Фрилансер
3388 / 2789 / 3000
Регистрация: 08.02.2012
Сообщений: 7,116
Записей в блоге: 1
03.10.2012, 14:02 2
Pascal
1
2
3
4
5
6
7
8
For i:=1 to n do
 Begin
  b:=false;//встречался ли элемент
  For j:=i+1 to n do
   if (A[i]=A[j])and(A[i]>0) then b:=true;//если попался повторный то b:=true;
  if b then //если элемент встретился более одного раз,либо перестановка элементов 
  //либо записываем в новый массив элементы без этих повторных
 End;
1
Bassist
1 / 1 / 1
Регистрация: 12.04.2012
Сообщений: 34
04.10.2012, 15:23  [ТС] 3
Большое спасибо за помощь, но моих скудных познаний Pascal хватило только на это:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
const count=15;
     a: array [1..count] of integer=(-3,-1,-5,-7,-11,5,3,7,9,5,7,21,15,17,19);
var  j,i,n: integer;
     b:boolean;
begin
     write ('Исходный массив: ');
     for i:= 1 to count do write (' ',a[i]); writeln;
     for i:=1 to count do
      begin
       b:=false;
       for j:=i+1 to n do
       if (A[i]=A[j])and(A[i]>0) then b:=true;
       if b then
       end;
     readln;
end.
0
CodeR
Фрилансер
3388 / 2789 / 3000
Регистрация: 08.02.2012
Сообщений: 7,116
Записей в блоге: 1
04.10.2012, 15:25 4
Стандартные операции с массивами (матрицами) поправишь просто условие чтобы ещё были и положительными эти повторяющиеся
1
Bassist
1 / 1 / 1
Регистрация: 12.04.2012
Сообщений: 34
04.10.2012, 15:35  [ТС] 5
Спасибо Вам огромное! Я эту тему читал преред тем как создавать здесь тему, но это сообщение почему-то проглядел.
0
04.10.2012, 15:35
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
04.10.2012, 15:35

Исключить все положительные элементы, встречающиеся в массиве более раза, затем отрицательные упорядочить
Помогите пожалуйста, буду очень благодарен: дан массив x целых чисел, содержащий как положительные,...

Из массива удалить четные элементы, встречающиеся более одного раза
Из массива удалить четные элементы встречающиеся более одного раза. пример: массив a:9 3 4 9 1 0 0...

В матрице А(N,N) найти элементы, встречающиеся не более одного раза
В матрице А(N,N) найти элементы, встречающиеся не более одного раза. Напечатать их значения,...


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

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

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