Вопрос по информатике:
Составить программу, которая формирует случайным образом одновременный массив из N элементов и выводит повторяющийся элемент должен выводиться один раз независимо от того, сколько раз он встречается в массиве
Пожаловаться
- 15.08.2018 14:00
- Информатика
- remove_red_eye 18628
- thumb_up 11
Ответы и объяснения 1
// PascalABC.NET 3.3, сборка 1573 от 04.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),1,10); a.Println;
a.GroupBy(t->t).Select(t->(t.Key,t.Count)).Where(t->t[1]>1).
Select(t->t[0]).OrderBy(t->t).Println;
end.
Пример
n= 15
3 2 6 9 5 1 8 5 1 7 10 5 8 7 7
1 5 7 8
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),1,10); a.Println;
a.GroupBy(t->t).Select(t->(t.Key,t.Count)).Where(t->t[1]>1).
Select(t->t[0]).OrderBy(t->t).Println;
end.
Пример
n= 15
3 2 6 9 5 1 8 5 1 7 10 5 8 7 7
1 5 7 8
Пожаловаться
- 16.08.2018 12:34
- thumb_up 32
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы