Предмет: Информатика, автор: egoriv03

Дана целочисленная последовательность, каждый член которой a: 1<= a <= 255. Удалить из последовательности числа "дублеры". Т.е. оставить все не повторяющиеся числа, а так же из повторяющихся несколько раз (более одного) оставить по одному числу. Оставшиеся числа расположить в порядке возрастания.
Входные данные имеют следующую структуру: сначала идет число членов последовательности, а потом члены последовательности.
Например. Вход: 8 45 13 24 45 2 13 61 13 . Выход: 2 13 24 45 61.
Исходные данные вводятся с помощью файла. ВЫВОД МОЖЕТ БЫТЬ В ФАЙЛ ИЛИ НА ЭКРАН МОНИТОРА.
входные файлы оформлять именами test.in, выходные - rez.out.

Ответы

Автор ответа: Аноним
0

// PascalABC.NET 3.4.2, сборка 1790 от 15.09.2018

// Внимание! Если программа не работает, обновите версию!

begin

 var s:=ReadAllText('test.in');

 s.ToIntegers.Skip(1).Distinct.Sorted.Println

end.

Приложения:

Аноним: Замечание: программа игнорирует значение первого числа (количество элементов последовательности), поэтому его значение роли не играет.
Похожие вопросы
Предмет: Английский язык, автор: Аноним
Предмет: Геометрия, автор: FaerVator