Работа с одномерными массивами

@En0t1k · Регистрация: 12.12.2017

Author24 — интернет-сервис помощи студентам

Задание: исходные данные задавать с использованием генератора случайных чисел

Задано число N, вывести числа 1, 2 ..., N в случайном порядке. Учесть что каждое из чисел должно быть выведено всего 1 раз. Например для N=4 правильным решением будет "1,4,3,2", решение "1,1,3,2" считается неправильным.

@D1973 · 22.12.2017, 18:31

En0t1k, а что можно использовать? А то вот недавно аналогичное задание сделал, а мне высказали, что того нельзя, другого нельзя... Так что поконкретнее, пожалуйста...

@En0t1k · 22.12.2017, 18:57 **[ТС]**

В соответствии с данным заданием, надо выполнить требуемые действия, исходные данные задавать с использованием генератора случайных чисел

@D1973 · 23.12.2017, 08:31

Другими словами, перемешать цифры в числе?

@Massaraksh7 · 23.12.2017, 09:03

Delphi

procedure TForm1.Button1Click(Sender: TObject);
const N=10;
var A:array of integer;
var i,i1,i2,k:integer;
begin
SetLength(A,N);
for i:=0 to N-1 do A[i]:=i;
Label1.Caption:='';for i:=0 to N-1 do Label1.Caption:=Label1.Caption+IntToStr(A[i])+' ';
for i:=0 to N*10 do
   begin
   i1:=Random(N);i2:=Random(N);
   if i1<>i2 then begin k:=A[i1];A[i1]:=A[i2];A[i2]:=k;end;
   end;
Label2.Caption:='';for i:=0 to N-1 do Label2.Caption:=Label2.Caption+IntToStr(A[i])+' ';
end;

@En0t1k 0 / 0 / 0 Регистрация: 12.12.2017 Сообщений: 20
		1
	Работа с одномерными массивами 22.12.2017, 17:24. Показов 598. Ответов 4 Метки нет (Все метки) Задание: исходные данные задавать с использованием генератора случайных чисел Задано число N, вывести числа 1, 2 ..., N в случайном порядке. Учесть что каждое из чисел должно быть выведено всего 1 раз. Например для N=4 правильным решением будет "1,4,3,2", решение "1,1,3,2" считается неправильным. 0

@D1973 Модератор 9256 / 6034 / 2379 Регистрация: 21.01.2014 Сообщений: 25,793 Записей в блоге: 3
	22.12.2017, 18:31	2
	En0t1k, а что `можно` использовать? А то вот недавно аналогичное задание сделал, а мне высказали, что того нельзя, другого нельзя... Так что поконкретнее, пожалуйста... 0

@En0t1k 0 / 0 / 0 Регистрация: 12.12.2017 Сообщений: 20
	22.12.2017, 18:57 [ТС]	3
	В соответствии с данным заданием, надо выполнить требуемые действия, исходные данные задавать с использованием генератора случайных чисел 0

@D1973 Модератор 9256 / 6034 / 2379 Регистрация: 21.01.2014 Сообщений: 25,793 Записей в блоге: 3
	23.12.2017, 08:31	4
	Другими словами, перемешать цифры в числе? 0

	23.12.2017, 09:03