0 / 0 / 0
Регистрация: 19.10.2011
Сообщений: 8

Написать программу нахождения количества различных элементов последовательности

19.10.2011, 23:34. Показов 2338. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Дана целочисленная последовательность (одномерный массив целых чисел). Написать программу нахождения количества различных элементов этой последовательности. Вывести (в порядке возрастания значений) все элементы, встречающиеся более одного раза.
Пример. В последовательности 1 0 2 2 1 6 1 8 0 различными элементами являются 0 1 2 6 8. Таким образом, правильный ответ на первый вопрос – число 5. Элементами, встречающимися более одного раза, являются 0 1 2.

Неправильно выводит элементы встречающиеся более одного раза. Подскажите что не так.

C#
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
53
54
55
56
57
58
59
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
 
namespace лаб4_3
{
    class Program
    {
        static void Main(string[] args)
        {
            int n = 1, i=0,j=0,k=1,n1=0,i1=0;  //Объявление перменных
            Random r = new Random();
            Console.WriteLine("Введите размерность массива");
            n = Convert.ToInt32(Console.ReadLine());
            int[] a = new int[n];   //Объявление массива
            int[] b = new int[n];
            for (i = 0; i < n; i++) //Заполнение массива
                a[i] = r.Next(-10, 10);
            for (i = 0; i < n; i++) //Вывод заполненного массива на экран
                Console.WriteLine(" a[" + i + "] = " + a[i]);
            Console.ReadLine();
            for (i = 1; i < n; i++)
            {
                for (j = i - 1; j >= 0; j--)
                    if (a[j] == a[i]) //Проверка на равенство элементов
                        break;
                if (j < 0) k++; //Счетчик различных элементов
                else
                {
                    if (n1 == 0)
                    {
                        n1++;
                        b[0] = a[i];
                        
                    }
                    else
                    {
                        for (i1 = 0; i1 < n1; i1++)
                            if (b[i1] == a[i]) break;
                        if (i1 == n1) //Занесение одинаковых элементов в новый цикл
                        {
                            n1++;
                            b[n1] = a[i];
                            
                        }
                    }
                        
                  }            
            }
            Array.Sort(b);
            Console.WriteLine("Элементы встречающиеся более одного раза ");
            for (i = 0; i < n1; i++)
                Console.WriteLine(b[i]);
            Console.WriteLine("Кол-во различных элементов " + k);
            Console.ReadLine();
        }
    }
}
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
19.10.2011, 23:34
Ответы с готовыми решениями:

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

Массив: Написать программу для нахождения количества отрицательных элементов строки матрицы
Здравствуйте. Нужна очень помощь. Задана числовая матрица А. Написать программу для нахождения количества отрицательных элементов строки...

Написать программу для нахождения количества значений элементов массива меньших среднего арифметического
1. Дан двумерный числовой массив A состоящий из 35*35 элементов. Написать программу для нахождения количества значений элементов массива...

5
Эксперт .NET
 Аватар для kolorotur
17823 / 12973 / 3382
Регистрация: 17.09.2011
Сообщений: 21,261
19.10.2011, 23:42
А можно ведь и так:
C#
1
2
3
var a = new[] { 1, 0, 2, 2, 1, 6, 1, 8, 0 };
Console.WriteLine("Количество различных элементов: {0}", a.Distinct().Count());
Console.WriteLine("Числа, встречающиеся более одного раза: {0}", string.Join(", ", a.Where(x => a.Count(y => x == y) > 1).Distinct()));
2
0 / 0 / 0
Регистрация: 19.10.2011
Сообщений: 8
19.10.2011, 23:48  [ТС]
Дело в том, что мы еще не такие крутые кодеры. =) Лаба расчитана на циклы, поэтому нужно делать длинным вариантом.

Например, вот рабочая программа одногруппника:

C#
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
53
54
55
56
57
58
59
60
61
62
63
64
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
 
namespace Lab_4_3
{
    class Program
    {
        static void Main(string[] args)
        {
            //ввод массива и все дела
            Console.WriteLine("Привет! Введите, пожалуйста, количество элементов массива...");
            int n = Convert.ToInt32(Console.ReadLine());
            Console.WriteLine("Введите, пожалуйста элементы массива через \"Enter\"...");
            int[] array1 = new int[n],array2=new int[n];
            for (int i = 0; i < n; i++)
                array1[i] = Convert.ToInt32(Console.ReadLine());
            //конец ввода
            int j = 1,k=1,i1=-1,j1=-1;      //вспомогательные переменные
            for (int i = 1; i < n; i++)
            {
                j = i-1;    
                while (j >=0)   //цикл от текущего элемента к первому
                {
                    
                    if (array1[i]==array1[j]) break;    //проверка на равенство текужего и всех 
                    j--;                                //предыдущих
                    
                }
                if (j < 0) k++;         //совпадение нет - кол-во уникальных +1
                else
                {
                    //совпадение есть
                    while (j1 > -1)
                    {
                        if (array1[j1] == array1[i]) break;
                        j1--;   //проверка есть ли в массиве дублирующих элементов такой элемент
                    }
                    if (j1==-1)     //нет - заносим
                    {
                        i1++;
                        array2[i1] = array1[i];
                        j1 = i1;    
                    }
                }
            }
            
            Console.WriteLine("Количество уникальных элементов равно {0}",k);
            Console.WriteLine("Элементы, которые встречаются более одного раза");
            if (i1 == -1) Console.WriteLine("Нет таких элементов");
            else
            {   //есть повторяющиеся элементы
                int[] array3 = new int[i1 + 1];
                for (int i = 0; i < i1 + 1; i++)
                    array3[i] = array2[i];  //заносим в новый массив для сортировки
                Array.Sort(array3);         //сортируем
                for (int i = 0; i < i1 + 1; i++)
                    Console.WriteLine(array3[i]);   //вывод на экран
            }
            Console.ReadLine();
        }
    }
}
0
В астрале
Эксперт С++
 Аватар для ForEveR
8049 / 4806 / 655
Регистрация: 24.06.2010
Сообщений: 10,562
19.10.2011, 23:51
C#
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
using System;
using System.Collections;
using System.Linq;
 
namespace Cons
{
   class Test
   {
      public static void Main(string[] args)
      {
         int[] array = {1, 0, 2, 2, 1, 6, 1, 8, 0};
         var query = 
            from val in array
            group val by val into g
            let count = g.Count()
            where count > 1
            select new
            {number = g.Key,
             Count = count};
         foreach (var elem in query)
         {
            Console.WriteLine(elem.ToString());
         }
         
         Console.WriteLine("Num of diff elems: {0}", array.Distinct().Count());
      }
   }
}
1
0 / 0 / 0
Регистрация: 19.10.2011
Сообщений: 8
20.10.2011, 11:52  [ТС]
Дарёному коню в зубы не смотрят конечно, спасибо вам за код, но всё же не могли бы вы просто подправить мой вариант? =)
0
Неадекват
 Аватар для freeba
1501 / 1237 / 248
Регистрация: 02.04.2010
Сообщений: 2,807
20.10.2011, 13:07
Цитата Сообщение от vtkrbq Посмотреть сообщение
но всё же не могли бы вы просто подправить мой вариант? =)
Не, так не интересно. Веселее свой написать:
C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 int[] a = new int[9] { 1, 0, 2, 2, 1, 6, 1, 8, 0 };
 
            Array.Sort(a);
            int count = 1, tmp = a[a.Length - 1]; //count равно еденице т.к. хотябы один различный элемент в массиве должен быть.
            string NonUniqueElement = string.Empty;
 
            for (int i = 0; i < a.Length - 1; i++)
            {
                if (a[i] != a[i + 1]) count++;
                else
                {
                    if (a[i] == tmp) continue;
                    tmp = a[i + 1];
                    NonUniqueElement += a[i] + ", ";
                }
            }
 
            Console.WriteLine("Уникальных элементов: {0}", count.ToString());
            Console.WriteLine("Встречаются более одного раза: {0}", NonUniqueElement.Remove(NonUniqueElement.Length - 2));
 
            Console.ReadKey();
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
20.10.2011, 13:07
Помогаю со студенческими работами здесь

Объясните строку в программе нахождения количества различных элементов массива
Объясните одну строчку в программе: set&lt;int&gt; s((int*)a, (int*)a + row); #include &quot;stdafx.h&quot; #include &lt;iostream&gt; ...

Написать программу нахождения количества слогов в слове
Например количество &quot;по&quot; в слове гипопотам

Написать программу нахождения количества цифр 3 в целом числе
Написать программу нахождения количества цифр 3 в целом числе

Написать формулу для нахождения количества элементов.
Для нахождения количества элементов обладающих свойствами t1 и t3 и не обладающих t2и t4,если известно что всего элемнтов n

Написать программу для нахождения в строке количества гласных букв
Доброго времени суток Написать программу для нахождения в строке количества гласных букв. Само предложение: &quot;Кошки самые милые...


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

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

Новые блоги и статьи
Отчёт о спецтехнике находящейся в ремонте
Maks 20.04.2026
Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .
Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)"
Hrethgir 19.04.2026
Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определенном условии
Maks 19.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД
Maks 14.04.2026
Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru