Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
sonsonms
02.02.2023 07:16 •
Информатика
Массив из 20 элементов заполнить случайными числами в диапазоне от -50 до 50. отсортировать массив по возрастанию
Ответ:
AsiyaEkb
07.10.2020 09:18
// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(20,-50,50); a.Println;
a.Sort; a.Println
end.
Пример
16 -19 -27 -1 24 17 47 -33 14 28 -12 -43 -27 37 44 -8 -2 39 -8 9
-43 -33 -27 -27 -19 -12 -8 -8 -2 -1 9 14 16 17 24 28 37 39 44 47
0,0
(0 оценок)
Популярные вопросы: Информатика
Koteekanuha
07.04.2021 03:26
Выберите верный формат записи ввода данных для переменных а, b, c. Выберите несколько из 6 вариантов ответа: 1) Read (a,b,c); 4) Readln (a,b,c); 2) Writeln (a,b,c);...
KristinaLando
04.08.2020 07:13
Дано: B+B∧F . Первым выполняется 1. B+B∧F 2. B∧F 3. B+B какое из этих...
толик147
06.05.2023 14:54
Напишите код програмы который будет вычислять периметр фигуры...
юля2759
06.05.2023 14:54
Написать программу которая будет считать среднее арифметическое всех четных элементов массива который автоматически, количество элементов должно быть 50,диапазон чисел...
dashutadashuta2007
09.10.2022 11:14
Элемент графического интерфейса на экране монитора (11 букв)...
Sachak95
03.12.2021 19:59
Растровое изображение размером 320 на 240 объем файла 50 кбайт. найти максимум цветов в палитре...
Melisaaaa
09.02.2023 17:05
Дано трёхзначное число. определить,стоит ли в середине цифра 3. нужно написать программу в pascal...
grrrrrrrrrr
28.07.2021 10:34
Скоро сдавать легкий вопрос ,но я не знаю как это правильно сделать! помгите необходимо вычислить в excel 891⋅43 . запись в ms excel выглядит следующим образом: +891+43...
8007F300среднячок
24.03.2021 02:20
Впоследовательности чисел найти кол-во чисел кратных 7 паскаль abc...
kostja07
24.03.2021 02:20
Чему равно максимальное значение положительного числа в 16 битах при знаковом представлении?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(20,-50,50); a.Println;
a.Sort; a.Println
end.
Пример
16 -19 -27 -1 24 17 47 -33 14 28 -12 -43 -27 37 44 -8 -2 39 -8 9
-43 -33 -27 -27 -19 -12 -8 -8 -2 -1 9 14 16 17 24 28 37 39 44 47