Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
ilyaachkasovggp06kg1
15.05.2023 01:37 •
Информатика
Даны 10 чисел. выведите в порядке убывания все различные из них паскаль
Показать ответ
Ответ:
dianaohanesian
06.10.2020 23:34
// PascalABC.NET 3.3, сборка 1547 от 07.10.2017
// Внимание! Если программа не работает, обновите версию!
begin
ReadSeqInteger(10).Distinct.OrderByDescending(x->x).Println
end.
Пример
18 -6 0 14 6 9 0 26 -6 12
26 18 14 12 9 6 0 -6
0,0
(0 оценок)
Популярные вопросы: Информатика
Arinacoco
21.03.2022 13:33
Ввести номер автобуса. Вывести количество oстановок его маршрута. Сделать как блок-схема...
zhenyadobr
21.03.2022 13:33
молю информатика 6 клас на венгерском языке...
evsiukova80
23.09.2022 11:09
Вшкольную команду по волейболу было отобрано некоторое количество учеников из 128 претендентов. сколько учеников было отобрано, если сообщения о том, кто был выбран...
shenikov2003
27.10.2022 23:12
Вася сосчитал количество цифр на клавиатуре из него вычел количество букв f (заглавных и строчных) на всех клавишах умножил полученное число на количество стрелок...
Noni234
13.04.2023 04:14
Задан массив А состоящий ищ 15 чисел. Диапазон от 1 до 23 заполняется рандомом. Найти среднее арифметическое и разность его элементов...
mixer239
24.02.2020 01:51
Запиши верный ответ.(Впиши соответствующую латинскую букву или цифру)C V C=...
Элника
15.05.2022 23:08
Введите число от 1 до 100 проверьте это результат выведите в файл output.txtpascal...
галина353
19.04.2023 12:52
Выбери истинные высказывания. Байкал находится в центре Азии на границе Иркутской области и Республики Бурятия в Российской Федерации.Лермонтов в 1832 переезжает...
Ягрь
02.08.2022 15:31
Какие единицы измерения информации есть в информатике. дам высокую оценку...
vasyazabelin
04.01.2023 19:26
решить подробно. Определить код Хэмминга для кодовой комбинации 0111...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// Внимание! Если программа не работает, обновите версию!
begin
ReadSeqInteger(10).Distinct.OrderByDescending(x->x).Println
end.
Пример
18 -6 0 14 6 9 0 26 -6 12
26 18 14 12 9 6 0 -6