Войти Регистрация Спроси ai-bota

Используя датчик случайных чисел заполнить массив из 20 элементов неповторяющимися числами

Показать ответ

Ответ:

Solomia023

27.06.2020 01:30

Используя Паскаль:

var rndm: array[1..20] of longint;
i,n1.n2,c : longint;

begin
for i:=1 to 20 do rndm[i]:=i;
for i:=1 to 100 do begin
n1:=random(19)+1;
n2:=random(19)+1;
c:=rndm[n1];
rndm[n1]:=rndm[n2];
rndm[n2]:=c;
end;
for i:=1 to 20 do write (rndm[i],' ');
end.

0,0(0 оценок)

Популярные вопросы: Информатика

cuper200017

18.02.2023 09:14

В одной из кодировок Unicode каждый символ кодируется 16 битами. Юля написала текст (в нём нет лишних пробелов): Вена, Тирана, Минск, Брюссель, Ватикан, Рейкьявик, Рим,...

pkeuakkaukuakk

27.03.2020 21:11

Массив задан датчиком случайных чисел на интервале [-31;45].Сформировать новый массив В,состоящий из нечетных элементов массива А.Размер произвольный....

короваточкару

28.12.2022 14:59

Укажи минимальный объём памяти (в битах), достаточный для хранения любого растрового изображения размером 51×51 пикселя, если известно, что в изображении используется палитра...

юля2759

29.04.2023 17:56

Выберете устройства, являющееся устройством выводаа. принтер, дисплей монитора, колонкиб. сканер, дисплей монитора, клавиатурав. микрофон, клавиатура, мониторг. Клавиатура,...

anastdidenko20oziw5s

09.10.2020 01:50

Укажите значение величины S после выполнения следующих команд: S:=7; S:=23; S:=S+6;...

elenak22

12.09.2022 01:11

Найти средне арифметическое элементов последовательности,превосходящих некоторого числа C.Массив задан датчиком случайных чисел на интервале [-44;35].Размер произвольный.Значение...

goverdovskay123

23.05.2021 09:17

Утверждение истинно: * «Можно создавать и использовать единственную модель объекта»; «Можно создавать и использовать только натурные модели объекта»; «Модель обладает всеми...

seredinavi

18.06.2021 03:17

На рисунке изображён план одноэтажного дома.Сторона каждой клетки на плане равна 1 м.Дом имеет прямоугольную форму. У дома имеется главный вход шириной 1 м и ворота шириной...

MadPrinter

29.09.2020 03:17

1Scratch программалау ортасында не себепті алгоритмтүрлерін қолданамыз?2Скриптілерді құру барысында программалау ортасынданеліктен шарт қойылады?3 не үшін бір әрекетті...

Валерия003322

08.02.2021 12:36

Вычеркните неправильные высказывания. Модель должна описывать все характеристики, свойства и параметры изучаемого объекта. Моделирование — это создание и исследование моделей...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку