Предмет: Информатика,
автор: 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
Предмет: Литература,
автор: daryasshu
Предмет: Алгебра,
автор: smyrfetta18
Предмет: Геометрия,
автор: gdykfygsrhshkfd