Интересная задача на рекурсию, Посл-ть из 3 символов Опции

[striker]

Нужна помощь в решении этой задачи:
Нужно записать с использованием рекурсии программу создания n-символьной последовательности, состоящей из совокупности трех символов (например: 0,1,2 или a,b,c), в которой нет двух смежных идентичных подпоследовательностей, например, послед-ти 2011 и 21012101 не удовлетворяют условию задачи, т.к. в первой рядом расположены два одинаковых элемента 1, а во второй – одинаковые подпоследовательности 2101.
Интересная только как тут задать условие повторения подпоследовательностей?
Предлагайте свои варианты решения.

[volvo]

я делаю последовательности, но не состоящие из определенных символов.

Где в ПЕРВОНАЧАЛЬНОМ задании сказано, что в последовательности не должно быть каких-то символов? Я этого условия не обнаружил... Это во-первых.

Во-вторых, какой длины может быть последовательность? 6 символов? 7? 20? 120? чем больше будет это число, тем меньше у тебя шансов дождаться окончания работы программы, и тем большее значение приобретает оптимизация. Поэтому уточни, какое максимальное N может быть, потом я покажу, что надо делать...

Добавлено через 13 мин.
В частности, при N = 4 вполне возможно вот такое, например, решение:

const
  n = 4;
  chars: string = 'abc';

function check(s: string): boolean;
var
  i, p: integer;
  ok: boolean;

begin
  ok := true;

  for i := length(s) div 2 downto 1 do begin

    for p := 1 to length(s) - 2 * i + 1 do
      ok := ok and (copy(s, p, i) <> copy(s, p+i, i));

  end;
  check := ok;
end;

procedure generate(s: string);
var i: integer;
begin
  if length(s) = n then begin
    if check(s) then writeln(s)
  end
  else
    if check(s) then
      for i := 1 to length(chars) do generate(s + chars[i])
end;

begin
  generate('');
end.

, программа отработает практически мгновенно... Однако при N = 22 эта программа будет работать уже больше 2-х секунд...