Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Последовательность чисел [D7, WinXP]

User_OKA © (2006-04-03 19:04:00)
Как сгенерировать всю последовательность чисел от 1 до 10?Каждое число должно быть сгенерировано один и только один раз.

User_OKA (2006-04-03 21:14:00) [1]
Спасибо Джо.

А для первого моего вопроса самое, то
for I := 1 to 10 do
можно в орешник.

Как можно было так вопрос сформулировать и сам не знаю.

Джо (2006-04-03 21:00:00) [2]
> [7] User_OKA (03.04.06 20:48)

http://algolist.manual.ru/maths/combinat/index.php

User_OKA (2006-04-03 20:48:00) [3]
Есть последовательность 1,2,3
Получаем:
1,2,3
1,3,2
2,1,3
2,3,1
3,1,2
3,2,1
Нужно получить неповторяющиеся последовательности чисел для последовательности 1,2,3,4,5,6,7,8,9,10

Virgo_Style (2006-04-03 19:17:00) [4]
Телепатор подсказывает, что числа должны быть случайно перемешаны. Если так, то создать массив, заполнить For i:=1 to 10 do A[i]:=i; далее перемешать (менять местами случайно выбранные элементы)

_lol_ (2006-04-03 19:10:00) [5]
OPEX =)

Джо (2006-04-03 19:06:00) [6]
> [3] Yanis © (03.04.06 19:05)
> Редиска :P

Ты не переживай, сейчас появится автор и скажет, что он имел в виду "нечто совсем иное" :)

Yanis (2006-04-03 19:05:00) [7]
var i: Integer; begin for i := 1 to 10 do ... end;
?

Yanis (2006-04-03 19:05:00) [8]
2 Джо
Редиска :P

Джо (2006-04-03 19:04:00) [9]
for I := 1 to 10 do

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »