перестановка символов

← →
ksenia © (2006-05-29 17:27) [0]

Здрасти Всем!!
Товарищи помогите решить задачу!!!
Есть N-ое кол-во символов, например ABCD, нужно переставить их местами, в любом порядке, например CADB....

Не представляю как это можно сделать ...Если у кого есть какие-нибудь примеры реализации подобных задач, или какой-нибудь простенький алгоритм........ скиньте....плиз!
За любое пояснение и разъяснение буду благодарна!!!!

← →
MBo © (2006-05-29 17:43) [1]

Сделать это можно и нужно самостоятельно, поскольку это задача рассчитана на то, чтобы человек немного поразмыслил, и научился использовать стандартные программные конструкции - циклы, рекурсию, примитивную работу со строками.
А уж когда что-то свое получится, заработает, тогда можно сходить, например, на algolist.manual.ru, чтобы посмотреть эффективные методы.

← →
SergP © (2006-05-30 08:32) [2]

> За любое пояснение и разъяснение буду благодарна!!!!

Все зависит от размера и формы выражения благодарности.

...
var str:string; Ch:char; x:integer;
...
randomize;
for i:=1 to length(str) do
begin
x:=random(length(str))+1;
ch:=str[i];
str[i]:=str[x];
str[x]:=ch;
end;

перестановка символов Найти похожие ветки