Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
komarrik
22.01.2021 03:11 •
Информатика
Напишите программу сортировки 10 чисел сгенерированных от 0 до 100. и отсортировать их от максимального до минимального. в паскале программу (рандом и массив)
Ответ:
ОтличницаКотик5
04.10.2020 18:59
// PascalABC.NET 3.2, сборка 1356 от 04.12.2016
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(10,0,100); a.Println;
Sort(a,(x,y)->x>=y); a.Println
end.
Пример
49 17 50 84 14 9 69 5 40 70
84 70 69 50 49 40 17 14 9 5
0,0
(0 оценок)
Популярные вопросы: Информатика
romatopovsky
29.01.2022 08:18
Определите результат выполнения нижеследующего псевдокода, если n = 10 алг Сумма квадратов (арг цел n, рез цел S) дано | n 0 надо | S = 1*1+2*2 + 3*3 + ... + n*n нач цел i ввод...
zobitkov
29.01.2020 01:49
Владимир решил выступить с докладом на конференции «компьютерные технологии 2016». для участия в ней в этом году необходимо пройти регистрацию на сайте. каждому участнику присваивается...
endd1
29.01.2020 01:49
Какие есть объекты файловой системы...
Foxoff
05.08.2020 08:32
Перевести десятичное число 48 в позиционную систему счисления с основанием 2...
valeriya2812
05.08.2020 08:32
Догодайся ,о каких носителях идёт речь пишите номер вопроса потом ответ 20 б 1 амнкеь 2ппрсиау 3секдиат 4 агубам 5 флеш 6 чевистерн...
olegmuslimov778
05.08.2020 08:32
Универсальное программно устройство для обработки информации...
goldwildcat1
05.08.2020 08:32
Умісті старопрограмістську є усього 2 види міського транспорту: метро, де квиток коштує 3 біта і автобус, де квиток коштує 2 біта. можна придбати проїзний квиток на обидва види...
romababiy09
05.08.2020 08:32
1. даны 3 числа а,в и с. значение наибольшего из них удвоить. 2. даны 3 числа а,в и с. выяснить существует ли треугольник со сторонами а,в,с....
omelyanovichni
05.08.2020 08:32
мне ! информатика! (единицы измерения и количество информации) 1)какое количество информации получит 2 игрок после первого хода 1, в игре в крестики нолики на поле размером 8*4?...
logean
19.06.2022 15:44
Три подружки - маша, оля и юля - купили в магазине груши, яблоки и сливы, причем каждая девочка покупала только один вид фруктов и все покупки у них были разные. на вопрос, кто...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(10,0,100); a.Println;
Sort(a,(x,y)->x>=y); a.Println
end.
Пример
49 17 50 84 14 9 69 5 40 70
84 70 69 50 49 40 17 14 9 5