tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
5. составьте и запишите
5. составьте и запишите программу на паскале заполнения одномерного массива, состоящего из 10 элементов, случайными числами из диапазона от 1 до 10, упорядочивания элементов массива и последующего вывода массива на экран.
берсик7
3 24.12.2019 19:12
1
Ответы
Pro2222
10.10.2020 23:03
===== PascalABC.NET =====
begin
var a := ArrRandom(10, 1, 10);
a.Println;
a.Sort;
a.Println
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
jolyy
29.07.2019 20:40
Паскаль для решения следующей : заполнить целочисленный массив 20-ю случайными элементами в диапазоне от 20 до 40 и найти сумму лишь нечётных номеров (элементов) массива....
brayamsp0altc
29.07.2019 20:40
Срчно по каким признакам мы сравниваем реальные объекты? 1) по существенным признакам 2) по размерам, цвету, форме 3) по количеству и качеству...
danilarostov2
18.06.2019 10:00
Сформируйте одномерный массив состоящий из 20 случайных двузначных чисел в диапазоне от 10 до 99 определить сколько раз будет число 35...
сынок16
17.07.2019 03:20
Комбинаторика. егэ. информатика. объясните решение. алексей составляет таблицу кодовых слов для передачи сообщений, каждому сообщению соответствует своё кодовое слово. в качестве...
anzhelaromanova02
10.04.2020 18:22
Мебельная фабрика для сборки столов и стульев привлекает к работе на 10 дней четырех столяров. Каждый столяр тратит 2 часа на сборку стола и 30 ми нут — на сборку стула. Покупатели...
KosherDan
10.04.2020 18:21
1. var s,k: integer; begin s := 0; for k := 5 to 11 do s := s + 6; writeln(s); end. 2. var d,n: integer; begin d := 5; d := d - 3; for n := 1 to 4 do d := d + n; writeln(d); end....
faa7
10.04.2020 18:21
Перевод технической документации, деловой переписки лучше выполнить: в программе-перевода или человеку СКАЖИТЕ...
djdjsjsj
24.06.2019 23:00
Определите значение переменной b после выполнения фрагмента алгоритма: а: =1; b: =0; while a 8 do begin b: =b+a; a: =a*2 end; write(b)...
alinkaaa888
24.06.2019 23:00
Прочитай и зачеркни команды которые компьютер не может исполнять: в систему команд компьютера могут входить команды: придумай алгоритм , скажи ответ , посмотри на экран , проверь...
vesnasurgut
02.02.2021 13:36
Как из 4 сделать 62 можно прибавлять 3 и умножать 2...
Популярные вопросы
В 6г вещества содержится 1,806 • 1026 молекул. Определите молярную массу данного...
1
Сөздер мен сөз тіркестерін мағынасына қарай байланыстырып жаз. ұшқан бесігім...
3
Театральное искусство древний Египет массовые игры...
1
Используя данные рисунка, найдите ВС. 1...
1
Які з даних твердженье правильними !!...
2
Если = 17 см, = 18 см, = 26 см, то = см....
2
зок С. 3. Точки A, B, C и D лежат на одной прямой. Точка Сле- жит между точками...
2
Где распространены растения длинного дня и где - растения короткого дня???...
3
Біз бүгін досым екеуіміз Айзеренің туған күніне барамыз. Жинаған азын- аулақ...
3
1. Какие из следующих явлений относятся к световым явлениям? а) в метро Двигается...
3
===== PascalABC.NET =====
begin
var a := ArrRandom(10, 1, 10);
a.Println;
a.Sort;
a.Println
end.