Генерирование строки

← →
bat00n (2005-07-29 16:08) [0]

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

"a"
"b"
"c"
...
"z"
"aa"
"ab"
"ac"
"ad"
..
"az"
"ba"
"bb"
и так далее.

← →
Fay © (2005-07-29 16:18) [1]

2 bat00n (29.07.05 16:08)
Скорость роста факториала Вам известна?

← →
bat00n (2005-07-29 16:20) [2]

смысл алгоритма заключается в том, чтобы перебрать все символы по порядку.

← →
Pearled © (2005-07-29 16:32) [3]

Например, можно так (правда будет выводиться немного в другом порядке):

procedure GetStr(const s: string; st,fin: char; maxlen: integer);
var
i: char;
begin
for i:= st to fin do
begin
Form1.ListBox1.Items.Add(s + i);
if (length(s)+1)<maxlen then
GetStr(s+i,st,fin,maxlen);
end;
end;

.....
GetStr("","a","d",6)

← →
Jeer © (2005-07-29 16:35) [4]

bat00n (29.07.05 16:20) [2]

Поздравляю, это и есть алгоритм.

← →
Defunct © (2005-07-29 16:37) [5]

> bat00n (29.07.05 16:20) [2]
В чем вопрос?
Вы спрашиваете что вам нужен алгоритм, и далее приводите его. Потом еще и растолковываете смысл сего алгоритма. Не ходите вокруг да около (алгоритм туп и прозрачен), скажите "прямо мне нужен код".

← →
bat00n (2005-07-29 16:51) [6]

под словом алгоритм я подрузомевал код! Простите, что неправильно задал вопрос. Мне нужен код.

← →
bat00n (2005-07-29 16:54) [7]

2Pearled
спасибо! Мне подходит этот код!

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