Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.75/8: Рейтинг темы: голосов - 8, средняя оценка - 4.75
0 / 0 / 0
Регистрация: 12.01.2011
Сообщений: 24

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

19.01.2011, 16:29. Показов 1562. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите пожалуйста решить задачу: Дан целочисленный массив, состоящий из n элементов. Удалить из массива все элементы, встречающиеся мене двух раз.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
19.01.2011, 16:29
Ответы с готовыми решениями:

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

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

Удалить из массива все элементы, встречающиеся менее трех раз
Задача: Дан целочисленный массив размера n. Удалить из массива все элементы встречающиеся менее 3-х раз и вывести размер полученного...

3
6 / 6 / 3
Регистрация: 03.01.2011
Сообщений: 35
19.01.2011, 20:56
Поточнее... массив заполняем вручную или random????
0
0 / 0 / 0
Регистрация: 12.01.2011
Сообщений: 24
20.01.2011, 18:48  [ТС]
Не знаю,была дана только задача, а решение на свое усмотрение
0
Почетный модератор
 Аватар для Puporev
64314 / 47610 / 32744
Регистрация: 18.05.2008
Сообщений: 115,168
21.01.2011, 14:53
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

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
uses crt;
const nmax=100;
var a:array[1..nmax] of integer;
    n,i,j,k,l:byte;
begin
randomize;
repeat
write('Размер массива до ',nmax,' n=');
readln(n);
until n in [1..nmax];
writeln('Исходный массив:');
for i:=1 to n do
 begin
  a[i]:=random(n);
  write(a[i],' ');
 end;
writeln;
i:=1;
while i<=n do
 begin
  k:=0;
  for j:=1 to n do
  if a[j]=a[i] then k:=k+1;
  if k<2 then
   begin
    if i=n then n:=n-1
    else
     begin
      for l:=i to n-1 do
      a[l]:=a[l+1];
      n:=n-1;
     end;
   end
  else i:=i+1;
 end;
if n=0 then write('Все элементы удалены')
else
 begin
  writeln('Элементы, встречающиеся менее 2х раз удалены:');
  for i:=1 to n do
  write(a[i],' ');
 end;
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
21.01.2011, 14:53
Помогаю со студенческими работами здесь

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

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

Из массива A [7]: 4143190 удалить нечетные элементы, встречающиеся в массиве только один раз
Из массива A : 4143190 удалить нечетные элементы, встречающиеся в массиве только один раз. Должен получиться массив А:41410

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

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


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Загрузка PNG-файла с альфа-каналом с помощью библиотеки SDL3_image на Android
8Observer8 27.01.2026
Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
влияние грибов на сукцессию
anaschu 26.01.2026
Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
Модель сукцессии микоризы
anaschu 24.01.2026
Решили писать научную статью с неким РОманом
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru