подстановка букв в цикле

[spydark91]

есть строка содержащяя n кол-во символов(length(str))
есть массив arr:array[1..4] of char
как этому массиву можно присваивать все возможные значения?
т.е.
аааа
аааб
ааав
аааг
.....
ааая
ааба
аабб
аабв
аабг
....
аабя
.....
ааяя
....
аяяя
....
яяяя

вот так..думаю уже третий день..

[DenNik2006]

я так понял, нужно перебрать все возможные комбинации из четырех букв? причем тут строка из n символов? уточни

[spydark91]

дада,это я уже о своем)
из 4 букв)

[DenNik2006]

если все таки нужен перебор комбинаций, то вот:
допустим нужны все 4-х символьные комбинации из букв от "а" до "я"

var
  a,b,c,d: byte;
  arr: array [1..4] of Char;
begin
  for a:= Ord('а') to Ord('я') do
  for b:= Ord('а') to Ord('я') do
  for c:= Ord('а') to Ord('я') do
  for d:= Ord('а') to Ord('я') do
  begin
    arr[1]:= Chr(a);
    arr[2]:= Chr(b);
    arr[3]:= Chr(c);
    arr[4]:= Chr(d);
    Memo.Lines.Append(arr);
  end;
end;

набросал на коленке. Думаю сработает. Смотри только - комбинаций ОГРОМНОЕ количество!

[spydark91]

просто из этой строки мы берем то,что перечисляем

знаю что их оч много

это не совсем то

есть строка,содержащая не символы русского алфавита,это я просто для примера написал с ними
и после каждой такого подбора нужно ее склеить в строку вида "аббе",например

[DenNik2006]

Сообщение от spydark91

есть строка,содержащая не символы русского алфавита,это я просто для примера написал с ними
и после каждой такого подбора нужно ее склеить в строку вида "аббе",например

а вот здесь еще больше не понял! конкретный пример сюда

[astecenko]

То есть есть строка с каким-от набором символов, и надо получить все возможные 4-ех символьные варианты с символами из исходной строки?

[DenNik2006]

Сообщение от astecenko

То есть есть строка с каким-от набором символов, и надо получить все возможные 4-ех символьные варианты с символами из исходной строки?

понял. жди...

[astecenko]

т.е. допустим строка "snew", тогда надо получить
eeee
eeen
eees
eeew
eene
eenn
eens
eenw
...
wwww

так?

Практическое применение небось: знаешь какие символы (клавиши) входят в пароль и знаешь сколько раз их клацали но не знаешь пароля. Словарик для перебора делаешь?

[spydark91]

astecenko, именно так)
DenNik2006, спасибо,почти то ,что надо) дальше сам сделаю)