Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
ulia200634
01.12.2020 02:01 •
Информатика
Напишите программу сортировки 10 чисел сгенерированных от 0 до 100. и отсортировать их от максимального до минимального. в паскале программу (рандом и массив)
Ответ:
Mesnikfff
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 оценок)
Популярные вопросы: Информатика
GGNOOB777
23.01.2021 09:35
Дано трехзначное число.найдите сумму произведение цифр в числе. составьте программу паскаль...
ирина12374
19.03.2023 18:45
Как вы представляете использование 3D-редкторов в своей жизни?...
Masha7698755g
02.05.2023 21:39
26 . можно ли с трех гирь (1, 3 и 9 кг) взвесить с точностью до 1 кг любой груз до 13 кг включительно, если гири можно располагать на обеих чашах весов, в том числе...
winterwhite123
31.08.2020 16:04
с программой в Pascal ABC, нельзя преобразовать real в integer. Программа: Var a,b,c,d,e,f:real; n:integer; Begin a:=0; b:=0; c:=0; d:=0; e:=0; f:=0; n:=0; Write(...
LerkaKsuphaMey
31.12.2022 00:38
Как перевести число 2001 в двоичную систему...
Sonni18
26.07.2020 22:10
Когда используют колонки. я написала то колонки используют когда документ имеет абзацы,состоящие из коротких строк. что ещё написать? ?...
подругаКатя
30.01.2021 05:11
Как число: 1898 читается на ? ? скажите...
mashuljka33
30.01.2021 05:11
От куска проволки сначала отрезали половину, затем 30% оставшейся части, после чего осталось 8 м проволки. найдите первоначальную длину проволки....
bbigigitovadakit
30.01.2021 05:11
Создать программу для вычисления площади прямоугольника ( если а б) или площади треугольника (если б а)...
SerStroka
30.01.2021 05:11
Влесной звони растительности больше чем в зоне степей однако плодородия почв в степной зоне выше объясните причину...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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