Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.04.16;
Скачать: CL | DM;

Вниз

Последовательность чисел   Найти похожие ветки 

 
User_OKA   (2006-04-03 19:04) [0]

Как сгенерировать всю последовательность чисел от 1 до 10?Каждое число должно быть сгенерировано один и только один раз.


 
Джо ©   (2006-04-03 19:04) [1]

for I := 1 to 10 do


 
Yanis ©   (2006-04-03 19:05) [2]


var
 i: Integer;
begin
 for i := 1 to 10 do ...
end;

?


 
Yanis ©   (2006-04-03 19:05) [3]

2 Джо
Редиска :P


 
Джо ©   (2006-04-03 19:06) [4]

> [3] Yanis ©   (03.04.06 19:05)
> Редиска :P

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


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

OPEX =)


 
Virgo_Style ©   (2006-04-03 19:17) [6]

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


 
User_OKA   (2006-04-03 20:48) [7]

Есть последовательность 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


 
Джо ©   (2006-04-03 21:00) [8]

> [7] User_OKA   (03.04.06 20:48)

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


 
User_OKA   (2006-04-03 21:14) [9]

Спасибо Джо.

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

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



Страницы: 1 вся ветка

Текущий архив: 2006.04.16;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.049 c
15-1143267479
kilonet
2006-03-25 09:17
2006.04.16
Как обмениваться большими файлами


15-1143130706
Parus
2006-03-23 19:18
2006.04.16
Коллекция MIDов


15-1143020600
Кручен-Верчен
2006-03-22 12:43
2006.04.16
Не получается решить интегралы.


1-1141992346
abhtr
2006-03-10 15:05
2006.04.16
Ошибка при формирвании отчета в Word2000


2-1143644448
Fl@sh
2006-03-29 19:00
2006.04.16
TMemoryStream TidTCPClient..server