Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.56/25: Рейтинг темы: голосов - 25, средняя оценка - 4.56
0 / 0 / 0
Регистрация: 15.02.2016
Сообщений: 4

Подсчитать количество различных чисел в массиве

15.02.2016, 19:39. Показов 4975. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
помогите пожалуйста срочно нужно на завтра решить эту задачу:

Дан линейный массив целых чисел. Подсчитать, сколько в нем различных чисел. Размер массива задан изначально и содержит не менее 10 чисел.
Числа, входящие в массив, получить либо путем ввода с клавиатуры, либо с помощью генератора случайных чисел.
Для решения поставленной задачи можно завести вспомогательный массив, элементами которого являются логические величины (False - если элемент уже встречался ранее, True – иначе).
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
15.02.2016, 19:39
Ответы с готовыми решениями:

Подсчитать количество различных чисел, встречающихся в одномерном массиве
1) Подсчитать количество различных чисел, встречающихся в одномерном массиве; 2) Подсчитать сумму элементов каждой строки двумерного...

Количество различных(не повторяющихся) чисел, в массиве.
Найдите номера строк целочисленной матрицы в которой: а) на всех нечет позициях стоят нули б) на нечет позициях встречаются нули ...

Найти и вывести количество различных чисел в массиве
Дано натуральное число М и целочисленный массив А. Сосчитать и вывести количество различных чисел в массиве. Добавлено через 1 минуту ...

1
3410 / 1829 / 489
Регистрация: 28.02.2015
Сообщений: 3,696
16.02.2016, 11:47
Лучший ответ Сообщение было отмечено Егор228295 как решение

Решение

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
const
  n=10;
var
  a:array[1..n]of integer;
  i,j,k:integer;
begin
  writeln;
  for i:=1 to n do
    begin
      a[i]:=random(5);
      write(a[i]:3);
    end;
  writeln;
  for i:=1 to n-1 do
    for j:=i+1 to n do
      if a[i]=a[j] then a[j]:=-1;
  j:=0;
  for i:=1 to n do
    if a[i]>=0 then
      begin
        write(a[i]:3);
        inc(j);
      end;
  writeln('Count:=':10,j);
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
16.02.2016, 11:47
Помогаю со студенческими работами здесь

Подсчитать количество положительных и отрицательных чисел и количество нулей в массиве
1)Имеется массив А из N произвольных чисел - А(N), среди которых есть положительные, отрицательные и равные нулю.Выяснить, каким по счету в...

Подсчитать количество различных чисел в целочисленной матрице
Составте пожалуйта програму.Дана целочисленная матрица подсчитать количество различных чисел.Размерность и матрицу надо вводить с...

Количество различных чисел в массиве
Нужна программа, которая считает кол-во отличающихся чисел в массиве. Например, есть последовательность: 1 6 2 7 8 7 3 0 5 6. Ответ будет 8.

Используя множество посчитать количество различных чисел встречающихся в одномерном массиве
Используя множество посчитать количество различных чисел встречающихся в одномерном массиве.

Подсчитать количество четных чисел в массиве
Дан массив натуральных чисел,заполненный с помощью датчика случайных чисел.Подсчитать количество четных чисел.


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Контроль корректности заполнения дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru