Вопрос по информатике:
Используя датчик случайных чисел заполнить массив из 20 элементов неповторяющимися числами
- 14.08.2018 22:13
- Информатика
- remove_red_eye 15477
- thumb_up 46
Ответы и объяснения 1
Используя Паскаль:
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.
- 15.08.2018 01:32
- thumb_up 46
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.